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SPACE: An infinite frontier 

Celestial orbits, astronomy and 
spacecraft photography with 
the TRS-80 microcomputer 



NEWDOS/80 Version 2.0 
The Support Keeps Coming. 




Apparat's newest^ 
disk operat- 
ing system for 
the TRS-80®, 

MEWDOS/80 Version 2.0, has 
added many new enhancements 
and features to make your Model I 
or III computer more powerful. 
We've kept one thing the same. 
Our support. 

Version 2.0 is our second 
upgrade of our original MEWDOS 
for the TRS-80. Each version 
builds and improves on the 
capabilities of the preceeding 
versions. Just as important, 
Apparat's commitment to 
supporting our products makes a 
good product even better. By 
providing our customers with 
zaps on an ongoing basis, we're 
continually making MEWDOS/80 
Version 2.0 a more powerful tool. 



Version 2.0... 

High Performance DOS 

MEWDOS/80 Version 2.0 
builds even more performance 
into MEWDOS/80. The versatility 
and sophistication of Version 2.0 
includes features like: 

• Double density support on the 
Model I 

• Enhanced compatability 
between Model I and III 

• Triples directory size 

• Dynamically merge in basic 
(also allows merging of non 
ASC II format files) 

• Selective variable clearing 

• Can display basic listings page 
by page 



• Automatic 
repeat function key 
• Routing for 
peripheral handling 

• Enhanced disassembler 

• Command chaining 

• Superzap to scan files 

• Fast sort function in basic 

These new features, added 
to the existing capabilities of 
MEWDOS/80, makes it one of the 
most powerful additions you can 
make to your system. And 
Apparat's commitment to support 
assures that you've purchased a 
superior product, both today and 
tomorrow. At just $149.00 it could 
be the best investment you will 
make for your TRS-80. 

If you're thinking about 
upgrading your system, call 
Apparat today. Dealer inquiries 
welcome. 

303-741-1778 

TRS-80 is a registered trademark of Tandy Corp. 



Apparat, Inc. 



4401 So. Tamarac Rarkway, Denver, CO 80237 (303) 74 1 - 1778 

"ON GOING SUPPORT FOR MICROCOMPUTERS' 




Dosplus shifts into overdrive for business. 



THE NEW DOSPLUS 4.0 HARD 
DRIVE SYSTEM MEANS BUSINESS 
MAKE A SWIFT SHIFT The DOSPLUS 4.0 Hard Drive 
System turns your TRS-80 into a powerhouse for business 
applications. Shifting up to a hard drive is just like moving 
up from tape to floppy. It makes good business sense. You 
get the power, the dependability, the speed and capacity 
of a hard drive to power the software you need to keep 
your business in top gear. 

MIND YOUR OWN BUSINESS The power potential 
of the TRS-80 driven by DOSPLUS 4.0 Hard Drive System 
lets you mind your own business just like the big 
companies do. You can control accounts receivable, 
accounts payable, inventory, payroll, invoicing and a 
whole lot more accurately and with confidence because 
DOSPLUS 4.0 is the only current operating system 
designed from conception for hard disk operation. 

DOSPLUS 4.0 T.C.B. (Takes Care of Business) What good is 
a DOS if you have to spend so much time getting it to 
perform properly that your business suffers? The 
DOSPLUS Hard Drive System takes care of the computer 
while you take care of your business. It's a smooth, swift 
and silent business partner with the potential to handle up 
to 40 megabytes of capacity in 4, 10 meg units." So now 
you can shift your TRS-80 into over drive with DOSPLUS. 



THE DOSPLUS 4.0 FEATURES 

• Single volume addressing/Double sided floppies seen 



as one drive — Any single file can expand to limit of 
hard drive (up to 10 meg.) 

• Hard disk — disk editing utilities • Incredible I/O speed 

• Runs any combination of densities or tracks 

• Also operates 8" drives with special hardware — 
comes with expanded users guide and complete DOS 
technical section on I/O calls and DCB organization 

• "PLUS" ALL OF THE SENSATIONAL NEW DOSPLUS 
3.4 FEATURES 

THE DOSPLUS 4.0 HARD DRIVE SYSTEM 

• Smooth, silent, swift • Error-free disk I/O 

•*Add on up to 4, 10 meg units for a total of 40 megabytesl 

• Plugs on the 50 pin data bus. — no loss of floppy drives 

• Completely self-contained— just plug it in and go 

• 10 meg units available Soon. 

NOTE: Specify 40 or 80 track when ordering DOS diskette. 
After initial bootup, user can create any DOS desired. 

STARTING $' 
FROM 

'complete 

Lifetime warranty on original media. 

For more information Reader se; vice card 384 
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CALL TOLL FREE (Outside of Fla.) 

1-800-327-8724 ext. 197 

FOR VIS A/MASTERCHARGE/C.O.D. ORDERS 
TOLL FREE UNES WILL ACCEPT ORDERS ONLY'. 

For Applications and Technical information, 
call (305) 963-3390 or drop us a card. 

Dealers inquiries invited 



So Far, So Good .. . 




Your Model III is a fine computer. 

So why settle for less than 

a fine disk storage system? 

A fast, reliable disk storage system — no other 
device is so vital to the satisfactory performance of 
your computer. At Percom we build quality, high- 
performance disk drive systems. From gold-plated 
connector contacts to goldcad metal chassis 
structures. From proven design through 100% 
reliability testing. Percom disk systems are the 
standard by which others are judged — the industry's 
"gold standard," in a sense. And since Percom is the 
largest independent manufacturer of disk systems 
for microcomputers, you get Percom quality 
at very competitive prices. Add-on drives for 
TRS-80* computers start as low as $399. 
Complete first-drive systems for the Model III 
start at only $599. Put a quality Percom mini-disk 
storage system in your Model III. And save. 



#1 For Your Model III 

Percom TFD drives for your TRS-80* Model III computer are available in 
40- and 80-track versions with single or dual heads. Single-head 40-track 
drives store 180 Kbytes; dual-head 40-track drives store 360 Kbytes. 
Eighty-track drives store slightly over twice these amounts. Of course 
these are formatted capacities. The Percom Model III controller handles 
up to four drives so it's possible to access almost three million bytes of 
on-line program and data files. You get Percom's OS-80/III Basic 
language DOS with each first-drive system, and your first drive may be 
either internal (add-in) or external (add-on). Percom TFD drives work with 
Model III TRSDOS and other Model III disk-operating systems. First-drive 
systems are pre-assembled. Installation is accomplished with simple tools. 

#1 For Your Model I, Too 

Percom TFD add-on drives for the TRS-80* Model I computer are 
available with the same features and the same quality control measures 
as TFD Model III drives. As for Model III drives, all Percom Model I drives 
are double-density rated. Install Percom's popular DOUBLER II in your 
Model I Expansion Interface and upgrade your Model I to provide the 
same storage capacity as the Model III. 

Watch for Announcement of Percom's Low-Cost 
Hard Disk System for the Model III! 

To order, or for the name of your authorized Percom retailer, 
call toll free 1-800-527-1222. 



The Drive People 
You get more out of 
Percom disk systems. 
Expect it! 





PERCOM DATA COMPANY, INC. 

1 1 220 Pagemill Road • Dallas, Texas 75243 
(214) 340-7081 



PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE. 

•TRS-80 is a trademark of Tandy Radio Shack Corporation which has no relationship to 

Percom Data Company, Inc. 

PERCOM, DOUBLER II and OS-80/III are trademarks of Percom Data Company, Inc. 



Yes. ..I'd like to know more about 
the best for my TRS-80 computer. 
Send me free literature about 
quality Percom products. 

n MODEL I PI MODEL III 

Send to 

PERCOM DATA COMPANY. INC Dept 8-U 

1 1220 Pagemill Road. Dallas, TX, 75243 



PHONE NUMBER 



For TRS-80 Models I and M 

Introducing the Lowest Cost 

Hard Disk System Ever . . 

Laredo's LS525. 



5 million low cost bytes 
of on-line storage. 

At $1995.00 affordable hard disk 
storage is now within your reach. 

The LS525 hard disk system is 
easier to use than your printer . . . 
just plug it in switch it on and 
your disk storage problems are over 
forever. 

The LS525 gives you unheard-of 
speed and reliability. For starters 
we built a "mainframe like" control- 
ler that can detect disk surface de- 
fects and relocate the data to al- 
ternate tracks. Talking about speed 
the LS525 can access files 10 times 
faster than your floppy. 




*1995 



This coupled with proven "Winchester" 
technology is what we mean by relia- 
bility and speed. 

We also provide a user-friendly 
TRSDOS compatable operating system 
in which all of your existing soft- 




ware can run on. It provides features 
that can make the LS525 look like 
one big 5M byte drive or four small 
1.25M drives or whatever you like. 

The LS525 is a compact (less than 
one half cubic foot) "color-keyed" 
package that will fit perfectly next 
to your TRS-80. So if your tired of 
seeing "Disk Space Full" 



there's no excuse. 



Call toll free and order yours now. 

(800) 538-5137 

Inside. California call (408) 980-1888. 
* Model I or III host adapter $250 & LDOS $160 extra, specify when ordering. 

Icircdo 39}tGm5 inc. 

. . .mass storage for personal computers. 

Laredo Systems Inc. 2264 Calle De Luna, Santa Clara, California 95050 

TRS-80 and TRSDOS are trademarks of Radio Shack a Tandy Co. 
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OUR COVER for this "Space" issue 
features an original drawing by Thomas Scott 
Nelson of Upland, California. Our 
appreciation and that of the artist are 
extended to the Public Relations Department 
at Jet Propulsion Laboratories, Pasadena, 
California, for access to the wonderful images 
they supplied for research on the cover art. 
The lead story this month is about research at 
J.P.L. on page 16. A short program is 
provided on page 107 for a reproduction of 
our cover image. 
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Editorial 



Space: The final frontier — or is it the first real frontier? I remember 
being a patient in a veteran's hospital back in November, 1957, when 
the Russians put up their Sputnik. It was a big deal, no doubt about it. 
I had all the ear-marks of the beginning of something really big. It 
was, for a few years. 

An ex-sergeant, who believed the earth was flat, said they were just 
putting one over on us. He said it was just another of those red- 
commie tricks and that they probably did it all with mirrors. Besides, 
he said, he had an amateur radio friend who couldn't pick up the 
signals, supposedly on or near the 20-meter ham band. It was enough 
to make a non-believer out of him. 

The grand show came in 1969. The first man to set foot on the moon 
was an exciting spectacle. We all had the honor of watching it on 
television. It was a show to remember, and in our time zone it was 
conveniently staged on a Sunday afternoon. 

The Russians always did their things first, then told about them 
later. Ours was very different. We watched the drama as it unfolded. 
Anything could go wrong and the whole world could witness it. (We 
either lucked out, or our mirrors worked better than theirs.) We got 
there and back, and then did it a few more times just to make sure that 
everyone knew that we could. 

Everyone remembers the names of Armstrong, Aldrin and Collins. 
I always felt sorry for Mike Collins. He made it all the way to the 
moon and couldn't be one of the first to set foot upon it. He wrote a 
book about it later and called it "Carrying the Flame". In it, he hinted 
that it didn't bother him not to set down on the surface. It was the one 
part of his book I couldn't believe. 

After the Apollo missions had come and gone, everyone expected to 
see more. It had been an excellent start, but somebody slammed the 
funding door in Washington and cut the whole manned program 
back. It's really too bad. According to one of the first three astronauts, 
it had cost each man, woman and child in the United States a little 
less than two dollars each to put those men on the moon. 

Where else are you going to get that kind of entertainment for under 
two bucks apiece? Aside from the drama of it all, look at the advances 
in technology which came about from the space program. The 
microcomputer I used to write this editorial is just one example. There 
are a hundred more advances in electronics and medicine alone. We 
not only had a show, but are living better because of it. It's a shame 
the program was cut back. 

I'm not a Bible-beater, but there is something to the phrase "beat 
your swords into plowshares". It's still good advice. There is nothing 
that would spur our "down" economy more than a joint manned 
space effort. Being involved in space exploration with your adversary 
could lead to better relations all around. Besides, we still have to 
convince the ex-sergeant that the earth is indeed shaped like an 
oblate spheroid. 

Mike 
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Letters 



After reading one (of your issues), 
I can see why Computerland never 
has any in stock! I got three useful 
(and well used) programs and a lot 
of good ideas out of the February 
1982 issue. What I especially liked is 
the way your articles are written. I 
was even more pleased when the 
programs I typed in worked. That is 
more than I can say for a lot of other 
programs I have typed in. Keep up 
the good work! 

Carl Brown 
Hershey, PA 

I am sure that you are constantly 
seeking ideas for future publication 
and in that vein I would like to offer 
my suggestions. 

Two of the most widely used 
programs are VisiCalc and Scripsit. 
I find the documentation for Scripsit 
sadly lacking and inadequate. I 
would love to see a series of articles 
dedicated to the use of Scripsit on 
the Model I and III. An adjunct to 
this would be the use of Scripsit with 
some of the Superscript programs as 
used with some of the most popular 
printers (Epson 80, and 100 and 
others). This series of articles could 
fill a wide gap in the documentation. 

VisiCalc is probably the most 
powerful program I have ever used. I 
have achieved some expertise with 
the program but am sure that there 
are tons of VC secrets out there. 
Some businessman (must be) using 
VC in an application not thought of 
by others. I would like to see articles 
on its use with sister programs that 
add to its usefulness. I can't afford 
to buy and try all these programs 
but on the recommendation of an 
article I certainly would purchase 
one or more if they filled my needs. 

I would also like to see more 
programs or suggestions for uses of 
the micro for Attorneys. I recently 
started a project for an attorney and 
am finding many uses such as the 
printing of more than 50 form letters 
that many attorneys use. 

Richard Eidmann 
Philadelphia, PA 

Thank you for the suggestions. 
We use Scripsit a lot, VisiCalc just 
some of the time. We are in the 
process of putting together a "law" 
theme. The theme is supported, at 
present, by only two articles. It 
should appear a few months from 
now. —Ed. 



Please relay to Mr. Ralph G. White 
that I think his "Tic Tac Toe" 
program in your February 1982 
issue is great! I learned more about 
string packing from copying his 
program than from any previous 
example I had ever seen. The game 
is fun to play too. 

I deleted lines 1224 and 1274 as 
they seemed to serve no purpose. I 
added another B$ in the first print 
address of line 1560; that cleans the 
screen better. I modified the two 
endings to provide a "permanent" 
blinking statement of who won. I 
have to hit BREAK to play again. 

Of the several computer 
magazines I read regularly, yours is 
the best for a TRS-80 owner. I copy 
most of your Fun 'N Games features 
and never fail to learn new 
programming techniques from 
them. 

William B. Oaks 
Renton, WA 



...Please pass the following on to 
Bob Liddil as it concerns the Book of 
BASIC Adventures. I have two of 
the programs running on the Color 
Computer (which takes some doing 
since the 16K Color Computer with 
Extended BASIC has approxi- 
mately 700 fewer bytes available for 
BASIC program storage than the 
16K Model I with level II). The first 
program I attacked was Lost 
Dutchman's Gold. The problem 
concerns line 2060 which goes to a 
NEW command if the player does 
not want another game. The NEW 
command is ok when included in 
commercial software, but it can 
wipe out a program which was 
laboriously keyed in and debugged. 
If you haven't already, you may be 
getting some irate letters and a word 
of caution to book purchasers might 
be in order. Incidentally, although I 
haven't tried it, you could probably 
recover such a lost program by 
peeking through the program in the 
command mode to find the two end- 
of-program zeros and then poking 
the address of the next byte into 
memory locations 27 and 28 on the 
Color Computer and whatever the 
equivalent addresses are for other 
machines. 

Bob Roberts 
Lancaster, OH 

Your advice is certainly well 



taken. It can be frustrating to lose 
hours of work, but by now everyone 
must know the meaning of the NEW 
command and not put that line into 
the program until it is totally 
debugged and ready to save. — Ed. 

I got your January 1982 issue 
today — what a start for '82 — 
congratulations! I have never read a 
magazine with so much useful 
information. 

I am a small businessman 
attempting to pay all the bills and 
employ the smallest number of staff, 
i.e., doing everything myself and 
going mad trying. I bought a 
computer two years ago and find it a 
great hobby — time permitting, 
maybe getting the computer to do 
the bookwork would give me more 
time to play with the computer! I do 
not think I am alone with this 
problem, and the 12-column ledger 
program (in 80- U.S., Jan 82) has 
given me great hope for the future. 
All I need now is the time to enter it 
(and convert to MX-80 codes). One 
point however, could you please 
print regularly how us readers can 
tell when our subscription is due? I 
dimly remember from an old issue it 
has to do with the number code on 
the label? or is your new addressing 
service sending reminders? I do not 
wish to miss a single (monthly!!) 
issue now. 

Will Teasel 
Tenterden, Kent, England 

It's nice to see that computers 
have become a mind-expanding 
hobby for you too. As for the 
expiration code our subscription 
fulfillment service uses, here is an 
explanation: 

123456 03 8301 
JONES, JOHN D 

The first number above the name is 
an in-house sequence number which 
identifies you. The second, two-digit 
number is the number of that issue, 
i.e., 03 is for the March issue. The 
third group of four digits is your 
expiration issue, i.e., 8301 would 
indicate that the January 1983 issue 
is the last of your subscription. 
Along with all this, of course, we 
always encourage everyone to 
renew early because it saves loads of 
paperwork. I hope this helps, and 
am glad you enjoy the magazine. — 
Ed. 
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My hat is off to Alan Simon for his 
article, Menu-80, in the March 1982 
issue. For LDOS users (here) is one 
small change for line 130: 

130 D=PEEK(15388)— 48 

The program will now see the right 
drive number on the screen. And I 
added a short subroutine so I could 
put this program on my system disk 
in drive and select the menu from 
any drive: 

80 DIMA(26):GOSUB350 
350 REM EDIT LINE 380 FOR 
TOTAL NUMBER OF DRIVES 
360 PRINT@530,"SELECT 
DRIVE MENU - "; 
370 X$=INKEY$:IFX$=""THEN 
GOTO 370 
375 X=VAL(X$) 

380 IFX< OR X >1 THEN 
PRINT® 594,"NO SUCH DRIVE!": 
GOTO 360 
390 CLS 

400 ONX+1GOTO410, 420, 430,440 
410 CMD"DIR :0":RETURN 
420 CMD"DIR :1":RETURN 
430 CMD"DIR :2":RETURN 
440 CMD"DIR :3":RETURN 

and just one more modification for 
those who change their minds: 

275 PRINT@773,"Z) TO SELECT 

ANOTHER MENU — "; 

285 IFV="Z"THEN GOTO 60 

Thanks for letting me share this 
with your readers, and thanks to 
you at 80-U.S. for the fine magazine 
you publish. 

John Gunsett 
San Pedro, CA 

And thank you John, for the good 
information you have given here. — 
Ed. 

...Please pass on to Spencer Hall 
that my experience with the Stringy 
Floppy parallels his except mine ran 
100% from start up and is absolutely 
a thrill to use. I guess I'm a satisfied 
user as I've purchased a number of 
other Exatron software items 
including the FMS program (a super 
file handling program) and the 
ESOS 2.4 (a slow disk simulator for 
stringy which has a number of 
powerful intrinsic routines such as 
renumber commands, merge, sound 



frequency and duration generator, 
lower case, and screen dump plus 
more, all for $35.00! I, too, simply 
use cassette for archival copies and 
my only problem with Stringy is 
running out of wafers! 

While I'm at it I would like to 
comment on the new monthly 
format. I find myself unable to 
absorb all of this material on a 
monthly basis. Bimonthly was fine 
for my needs. More often than not I 
return to back issues to ref amiliarize 
myself with the contents and 
something new will pop out... 

Tim Bowman 
Spokane, WA 
Sounds like the Stringy is indeed an 
@SUCCESS. Loading and saving 
at 7200 baud is a real step up after 
audio cassettes. — Ed. 

...As a retired person from 25 
years as Director of Research for 
Modern Medicine (Minneapolis, 
MN) a publisher of medical 
journals, I get a real kick out of 
reading your vagaries of a growing 
advertising publication. We 
experienced many of the problems 
you are meeting. And I do find your 
editors selection and handling of 
articles most helpful in my current 
microcomputer hobby. Just keep on 
experimenting and changing — but 
don't change too much and too fast. 
Al Hubbard 
Ft. Myers, FL 

We have been pulling ourselves up 
by the bootstraps for some time now 
and enjoy doing it as much as you 
enjoy watching it! There are many 
improvements to come; so many in 
fact, that it sometimes boggles the 
mind thinking of them. Will it all 
end with "electronic mail"? We 
don't know, but it's sure fun trying 
to anticipate and speculate. As far 
as going too far to fast: When you 
start from zero you sometimes need 
to double up to catch up. — Ed. 

The January 1982 issue of your 
journal is the first that I have seen 
and bought. I am entranced with the 
concept of listing variations in 
programs to fit the different TRS 
models. I own a Color Computer 
(16K Extended BASIC). 

Spencer Hall's article has a 
typical error in subroutine 42 — 
erase contents of box drawn by 41 
but leaves the box. You always have 
to restore the end of the line erased 



and whatever follows. The simplest 
change I could make without 
disturbing the original numbering 
system was: 

a) delete line 118 

b) change line 41 to: 41 GOSUB 115: 
GOTO 143 

c) change line 42 to: 42(original 
line): GOTO 119 

d) add line 143: 143 PRINT@PZ, 
ZT$;:GOTO 119 

I am disappointed that the Fun 'n 
Games, Hog Jowl Mansion, will not 
work on my 16K Color Computer. 

The article on expanding Color 
Computer memory by R. Wayne 
Day was perfect. 

How about a program for joining 
two or more programs from 
cassette? How about a subroutine 
for changing the position of a 
program line? These are the two 
things that I need the most at the 
moment (or a cassette editor). 

Joseph P. Laronda 
Cheshire, CT 
Hang in there. The routines you 
want will probably show up shortly 
and we will report on them as they 
do. — Ed. 

Thanks for your recent assistance 
(and courtesy) when I called for 
some subscription information. I 
have received my first issue and am 
very pleased. 

There are a lot of us Color 
Computer rookies out here who need 
all the help we can get. Your articles 
are helpful and program listings for 
the Color Computer are really 
appreciated. The more, the better. 
Good information for this machine 
is still a bit scarce. 

Something that would be very 
helpful to many of us would be 
information pertaining to limited, 
inexpensive systems. For instance, 
in your recent word processing 
articles, a fine product that would 
have been appropriate is C. C. 
Writer. It is a very low cost, cassette 
word processing program written in 
BASIC — it doesn't require disk, is 
user modifiable, and in general a 
terrific little package for a small 
system. 

Also, it's great that you have gone 
to a monthly. I hardly have time to 
digest all that info in one month, but 
it is is fun trying. 

Gary Burkhardt 
May, 1982 7 



Items at random 



It's May, and spring has finally 
sprung. The proofreaders have just 
finished proofing this issue and 
have walked away shaking their 
heads and saying that if we keep 
this up we might have a magazine! 
Their attention to detail is amazing, 
but they still miss a few now and 
then. Corrections to previous issues 
follow. 

Corrections 

In the March issue we published a 
short program and article called 
"Clean those disk heads". The 
listing allows the disk drives to 
continue rotating during the entire 
cleaning process. The program will 
not work on the Model III because 
disk drive operations require input 
and output to a port address as 
opposed to a memory location as on 
the Model I. Listing 1, below, will 
allow Model III users to accomplish 
the same disk cleaning task. Our 
thanks to Robert E. Brown of 
Schenectady, New York, for this 
input. 

Also in the March 1982 issue, page 
48 contained an article "Laying it 
on the line" and has a flaw in the 
listing. Lines 110 and 120 should 
read: 

110 NEXT Y2 
120 NEXT XI 
instead of: 



110 NEXT Yl 

120 NEXT X2 
As printed, the listing will give you a 
NF? error. 

The text pertaining to the "Pay- 
back" program listing on page 30 
of our April 1982 issue has a error. 
Specifically, the third paragraph 
should read: 

"Payback will neither strain your 
machine's memory (it runs in less 
than 700 bytes) nor wear out your 
typing fingers (only 14 program 
lines). It runs on all models. For 
Model II, change CHR$(243) in line 
50 to SPC(67). )Ed. Note — For 
Model II, also remove the 
:PRINT@64, CHR$(31) in line 150)." 
It seems we renumbered the 
program after the text had been 
edited and line number references 
no longer corresponded. We are 
sorry if this caused you a problem. 

Reader survey 

If you haven't yet completed the 
reader survey in the April issue, 
please do so soon. We are anxious to 
tabulate the results. Your answers 
will determine, to a large extent, 
the direction and content of this 
publication. Although we like to 
improve and fine tune the 
production, the editorial content 
should be dictated mostly by you, 
the readers. 



Listing 1 



55 
60 



70 



5 ' xxx CLEAN1/3 REVISED BOB BROWN 3/1/82 

10 ' »XI INSERT * OF LAST DRIVE (0-3) ON YOUR SYSTEM (BELOW) 

15 LASTDRIVE=1 

20 CLSiPRINTJPRINT "REMOVE ALL DISKS FROM DRIVES AND F'RESS <ENTER>"i! INPUT A 

25 FOR N=0 TO LASTDRIVEilF N=0 THEN DR=1 ELSE IF N=l THEN DR=2 ELSE IF N=2 THEf 

DR=1 ELSE IF N=3 THEN DR=8 

30 ' xxx DETERMINE IF MOD 1 OR MOD 3 

35 IF PEEK<293><>73 THEN M=l ELSE M=3 

40 ' XX* SELECT A RANDOM TRACK FOR HEAD POSITIONING 

15 IF M=l THEN TR=RND<35) ELSE TR=RND<10> 

50 ' xxx SELECT THE DRIVE 

IF M=l THEN POKE 11301, DR ELSE OUT 211, DR 

' xxx ISSUE "RESTORE" TO MOVE HEAD TO TRACK 

IF M=l THEN POKE 11316,3 ELSE OUT 210,3 

' xxx LOOK FOR FDC "NOT BUSY" STATUS 
75 IF M=l THEN ST=PEEK(11316> ELSE ST=INP<210> 
80 IF<ST AND 1)=1 THEN75 
85 ' xxx SELECT DRIVE AGAIN 

90 IF M = l THEN POKE 11301, DR ELSE OUT 211, DR 
95 ' xxx MOVE HEAD OUT SOMPLACE 
100 IF M=l THEN POKE 11319, TR ELSE OUT 211, TR 
105 IF M=l THEN POKE 11316,19 ELSE OUT 210,19 
110 ' xxx CHECK FDC STATUS AGAIN 
115 IF M=l THEN ST=PEEK< 11316) ELSE ST=INP(210) 
120 IF(ST AND 1)=1 THEN115 

125 PRINT"INSERT CLEANER DISK IN DRIVE »"SN!" 
130 INPUT A 

135 ' xxx ACTIVATE DRIVE FOR ABOUT 30 SECONDS 
110 FOR 1=1 TO 3300 

115 IF M=l THEN POKE 11301, DR ELSE OUT 211, DR 
150 NEXT I 
155 NEXT N 
160 PRINT"xxx CLEANING COMPLETED xxx" SEND 



THEN HIT <ENTER>"! 



In this issue 

The theme of this issue is space. 
Our cover artist, Thomas Scott 
Nelson, did a wonderful job with 
Saturn. This is his second cover for 
us (the first was in March 1982). We 
found it very interesting that the Jet 
Propulsion Labs were using a TRS- 
80. Harry Avant wrote the lead 
story, and it appears on page 16. 

With all the hoopla of the world 
coming to an end in March (we 
didn't believe it either), Terry 
Dettmann wrote a planet location 
program for the Color Computer. It 
gives the date and the relative 
angular position of the nine planets. 
It is a very interesting program to 
watch, and no, the planets did not 
line up in March. You can see it for 
yourself. 

Finding where the satellites are is 
the subject of an article by Dana 
Waldman and Mark Felton on page 
19. Let's see — if you point your 
antenna properly, you might get 
foreign television broadcasts (and 
reruns of "I Love Lucy"). 

Yes, Delmer, we finally found a 
home for your article, "Spaceship 
Orbitor". Delmer Hinrichs 
submitted this article so long ago I 
blush in thinking about it. We 
finally found an issue into which we 
could fit it. Not just another Lunar 
Lander, this program has all the 
realistic aspects of a real landing on 
four different satellites or the planet 
Mars. You have to be good, and 
learning to land on one of them does 
not guarantee a safe landing on 
another. It's tough, but also fun. 

Solving simultaneous linear 
equations is the subject of an article 
and program by J. C. Adams, Jr., 
Ph.D., on page 34. It is always nice 
to see the computer take the grunt 
work out of math, and this article 
does it well. 

Fred Blechman presents a small 
business invoice program on page 
42. His program earlier this year, on 
a 12-column ledger, has drawn 
considerable interest and we are 
sure this one will too. 

There is more too, see the table of 
contents. We hope you find it as 
interesting as we did. Make your 
days good ones, and tell everyone 
that you saw it in 80-U.S. Journal. 

Mike 
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HAPPINESS IS...NEWSCRIPT 

THE WORD PROCESSOR FOR 
BUSINESSMEN AND PROFESSIONALS 

We offer you ongoing support by answering 
your questions and providing reasonably 
priced enhancements. 

A FEW OF NEWSCRIPT'S STANDARD FEATURES: 

•Form Letters with merging of names and addresses 
'Gives superb appearance to your final documents 
•Comprehensive manual with hundreds of examples 
•Centering, top/bottom titles, indents, pagination 
•Underlining, boldface, double-width, italics* 
•Sub-scripts, super-scripts, proportional pitch * 
•Generates Table of Contents, sorted Index 
•Allows block graphics, special symbols t 

•Search and replace globally or within a range 
•Block move, copy, delete, insert from other file 
•AUTOSAVE, WHOOPS, DIRECTORY. KILL. REPEAT 

•Based on IBM's "EDGAR" and "SCRIPT" systems 
•Supplied ready-to-run on "tiny" DOSPLUS 
•Easily transferred to NEWDOS. NEWDOS/80. LDOS, TRSDOS 
•Includes handy Quick Reference Card 

NEWSCRIPT CONTROLS THESE PRINTERS: 

•EPSON MX-80, MX-100: all 12 fonts, plus underlining 
and block graphics; italics with GRAFTRAX 

•Centronics 737. 739; Radio Shack L.P. IV. L.P. VIII, Prowrlter, 
Daisy Wheel II. NEC PC-8023A. TEC 85Q0R. C.ITOH 8510: 
Right-justified true proportional printing 

*Good support for: Diablo. Spinwriter, Starwriter, QUME, Microline, 
Anadex, modified Selectric, standard line printers 

MOW AVAILABLE; right-justified true proportional support for 
Diablo, Spinwriter, Starwriter, and Qume (DaisyWbeel Option)** 

TYPICAL USER AND REVIEWER COMMENTS 

"There is a new word processor on the market that will change the way people think about the capabilities of the TRS-80. Imagine a 
powerful mainframe text editor running on a TRS-80, with virtual compatibility between the two versions. ..on-going support second to 
none, with superb documentation." (Jim Klaproth, 80-U.S. JOURNAL February, 1982) 
the manual: 

"It definitely rates the first '10' given to any documentation reviewed in this column." <A.A. Wicks, COMPUTRONICS. October, 1981) 

the software: "An excellent Word Processor" (D.H.): "Absolutely fantastic" (S.E.S.): "You have features that I cannot duplicate 

on my $14,000 system" (J.B.) 
the support: "Your phone information system and the prompt and courteous staff that you provide to help your clients.. .are worth 

the cost of the system." IV.H.H.) 

REQUIRE^ CONFIGURATION: 48K TRS-80 with 
one disk drive. Specify Model I or Model III. 




t Some features work only if your printer has the mechanical capability. 
DaisyWheel proportional is extra-cost option. 

TO ORDER, CALL NOW, TOLL-FREE: 

(800) 824-7888, Operator 422 

CALIF: (800) 852-7777, Oper. 422 

ALASKA/HAWAII: (800) 824-7919 

FOR TECHNICAL INFORMATION CALL: 

(213) 764-3131, or write to us. 

Order from your Software dealer, or from: 



PRom 



NEWSCRIPT 7.0: $124.95 

MAILING LABELS OPTION: 29.95 

Special: NEWSCRIPT + LABELS: 115.00 

Daisywheel Proportional Option: 49.95 

"PENCIL" / "SCRIPTSIT" 

File Converter: 14.95 

Manual Only (180 pages): 30.00 

Reference Card Only: 2.50 
Electric Webster + Correction Feature: 149.50 

Graphics Editor and Programmer: 45.95 

DOSPLUS 3.4: 149.95 



DEPT. C, BOX 560 • NO. HOLLYWOOD, CA 91603 
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TERMS: We accept VISA, Mastercard, checks. Money Orders, C.O.D. and 
even cash. We pay shipping via surface UPS inside U.S.A. Please add 
$3.00 for Blue Label, 6% tax in California, and 15% outside North Amer- 
ica (air shipment). 
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DEFENSE 
COMMAND 




By Hogue £ Konyu from Big Five 
You are the lone defender of 10 Krotnium fuel 
cells essential for the survival of the planet. 
Aliens swoop down from above to steal the 
fuel; it's your job to destroy them. You can 
stilt save the cells after a raid, but you must 
shoot the alien and simultaneously move under 
the cell to catch it. If things look bad you can 
set off one of your 4 antimatter bombs and 
destroy all enemies on the screen! 

16K tape. ..$15.95 32K disk. . . $19. 95 



ELIMINATOR 




By Westmoreland £ Cilman from A. I . 
You'll need all your keyboard manipulative 
skills to keep up with the action in this arcade 
game. You travel across the planet's low- 
-altitude airspace in an effort to prevent the 
marauding enemy from capturing your ener- 
gizer cells. All manner of alien craft await 
your arrival with destructive forces. For 1 or 
2 players, with sound. 

32K disk. ..$24. 95 




ALIEN 
DEFENSE 



By Larry Ashmun from Soft Sector 
Piloting your ship across the horizontally 
moving terrain, you must battle the various 
enemy spacecraft. You are under attack al- 
most constantly, and to make matters worse, 
your ground patrol people are being picked 
up by the alien landers. To save them, you 
must shoot the landers and "catch" the falling 
man. This fast action game requires skill and 
rapid reflexes. The model III version uses 
that model's special graphic features. 

Model I, Tape: $19.95 Disk: $24.95 
Model MI, Tape: $19.95 Disk: $24.95 

Visit our other stores: Seven Corners 
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By Roger Schrag from A. I . 
Your job is simply! !) to pilot your ship 
through a tortuous, horizontally scrolling 
maze, avoid or destroy the many enemy mis- 
siles that are constantly being launched 
against you, then find and destroy the alien 
fuel dumps. All the while, you must constant- 
ly monitor your dwindling fuel supply or risk 
an untimely end. 1 or 2 players, with sound. 



16K tape. 
32K disk. 



.$11.95 
.$20.95 



Instant Search/Sort 
DATABASE 

By G. Hatton from Acorn 

An easy-to-use, yet powerful database man- 
agement tool, ISS alleviates many of the comp- 
lications usually found in setting up and main- 
taining information files. Written in machine 
language, ISS can provide a multitude of 
sorts, subsorts, searches and categorizations 
in seconds. Because the processing is done in 
memory, you can manipulate the data at will 
without risk to your database on tape or disk. 
The number of records is limited only by your 
file format and the amount of RAM in your 
system. 

16K tape or 32K disk. .. $49. 95 

*^ MONEY 
MANAGER 
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By Andrew P. Bartorillo from Acorn 
A complete management tool for the home bud- 
get, it accurately keeps track of your check- 
book and provides an easy method of budget 
allocation. You can store information on up to 
100 checkbook entries per month (250 with 
48K), specify any automatic withdrawals, 
keep records of tax-deductibles, and record 
expenses by category. You can even break up 
charge account payments into the proper cat- 
egories. 

32K disk. ..$39. 95 

Data File 
Programming 

By Finkel & Brown from Wiley & Sons 
This self-teaching guidebook, written in 
clear, non-technical language, leads you at 
your own pace through the intricacies of data 
file programming and maintainence. Once 
learned, data file manipulation is the key to 
virtually all programming in the business and 
classroom environment. The book helps you 
set objectives and self-tests you on your pro- 
gress toward them. 

342 pages. ..$9. 95 

Center* Falls Church, VA & W.Bell Plaza 



From Lobo 

"...LDOS is by far the best disk operating 
system for the Model I TRS-80." 

Paul Wienner, 

June 80-M1CROCOMPUTING 

"...if you are a serious programmer, you 

should have LDOS." 

George Blank, Editorial Director 
September CREATIVE COMPUTING 

A totally new and advanced operating system 
that offers benefits to everyone from novice 
to advanced system programmers. LDOS 
comes with one of the most complete and well 
written documentation books ever, with 
easy-to-follow instructions to get started plus 
a wealth of supporting information for when 
you need it. This, plus a toll-free customer 
service number means that LDOS supports 
you as no one has before! 

Completely device independent, LDOS pro- 
vides for routing, linking, setting, and filter- 
ing of the input/output of a number of 
peripherals. Up to eight disk drives are sup- 
ported in almost any mixture: 5", 8", 
single/double density, up to 80 tracks, even 
hard disks. 

"Job Control" can end the tedium of repetitive 
keystrokes needed to call up and manipulate 
programs. Once you tell LDOS what it needs to 
do to get you up and running, it executes the 
series thereafter with a simple command. And 
LDOS notes the date all files were created or 
modified — even flagging files that haven't 
been backed-up after modification. 

We've just scratched the surface of LDOS 1 
capabilities, and we'll gladly send you a 
pamphlet that goes into more detail. But 
better yet, order LDOS now and begin 
enjoying the power that this system will bring 
to your computer use. 



Disk with manual 
Specify model I or 111 
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EDITOR/ 
ASSEMBLER- 
PLUS 



By Chamberlin £ Yates from Microsoft 
The "PLUS" in assembly language program- 
ming has arrived! Get the features of the 
Radio Shack version, PLUS the debugging 
features, macros, and more. Clear explana- 
tions abound in the 80-page reference/in- 
struction manual. It fully describes all the 
features, including the macro facility, assem- 
bly direct to memory, conditional assembly, 
added expression evaluators, auto-origin, 
alphabetic symbol table, and the quash 
command. 

16K tape (model I) $29.95 

32K disk (model I) $19.95 

■ 66OO Security Blvd. - Baltimore, MD 



TO ORDER CALL TOLL FREE 800 424-2738 



For information 
Call (202)363-9797 



THE PROGRAM STORE 

4200 Wisconsin Avenue NW, Dept. 8 04 Box 9609 
Washington, D.C. 20016 
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MAIL ORDERS: Send check or M.O. for total purchase 
price, plus $1.00 postage & handling. D.C. residents, add 
6% tax. Charge card customers: include all embossed 
information on card. 
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Get the most from your micro with 
software and accessories from one of 
the world's largest selections. 



The 

Program 

Store 



CALL TOLL FREE 

800424-2738 
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From Med Systems 

Your eyes are bloodshot as you peer into your 
computer's screen and cry, "I must be 
CRAZY!" If this has never happened to you, 
you've never tried ASYLUM, the 3-D graphics 
adventure! ASYLUM places you on a cot in a 
small (padded?) room. Periodically the janitor 
lobs a hand-grenade through the window. 
What you do next could mean escape — or 
disaster. 



16K tape. ..$14. 95 




Crush,Crumble 
and Chomp! 



From Epyx 

It's a monster movie, and you are the 
monster! You can be The Glob, Kraken, 
Mantra, Mechismo, Arachnis, or Coshilla — or 
even design your own "custom" monster (disk 
version only). This hilarious action game is 
loaded with graphics and sound as you prac- 
tice your villany . 

16K tape or 32K disk. ..$29.95 




By Sparky Starks from Adventure Int. 
As mercenary and galactic police officer, you 
must maintain the condition and control of all 
parts of your spacecraft. Suddenly some- 
thing appears on your screen: is it a Star- 
pirate or a friendly merchant ship? You can't 
tell yet, and at this speed you may have only 
a fraction of a second to make an attack /no 
attack decision. 

Model I & III, 16K tape. .. $24. 95 
Model I disk version $29.95 



LUNAR 




LANDER £;._._„ 

By Wall & Moncrief from Adventure Int. 
You get a vast lunar landscape, graphically 
depicted in both long range and close up, 
with many choices for landing sites. Choose a 
more difficult site and get more points — if 
you can land successfully. Great graphics 
and sound add to the realtime challenge and 
fun. 

16K tape. ..$14. 95 



VOYAGE OF THE 

VALKYRIE 




By Leo Christopherson from AOS 
Combine the animation and music techniques 
pioneered by Christopherson with the 
chalienae of his first fast-moving arcade game 
and you have VOYAGE OF THE VALKYRIE! 
You speed through a magical maze guarded by 
ferocious birds that swoop down to attack if 
you don't get them first. To list all the play 
and options of this exciting game would take 
the 16 pages of instruction included. 
16K tape... $34. 95 
16K disk. ..$39. 95 

ALSO FROM CHRISTOPHERSON: 

DUEL-N-DROIDS 

Teach your "animated android" how to wield a 

laser sword in mortal yet comic battle. 

Entertainment for all ages. 

16K protected tape.. .$1i|. 95 

16K protected disk. ..$20. 95 




By John Allen from Acorn 

Once you load ASTROBALL into your 
TRS-80, the arrow keys become flipper 
buttons, the screen becomes the play board, 
and you become the "Pinball Wizard!" A 
flying saucer, spaceships, meteors, and 
black holes add to the fun as your ball realist- 
ically zings around the board. Five skill 
levels. 

16K protected tape.. .$19.95 
16K protected disk.. .$19.95 

ALSO FROM JOHN ALLEN: 

PINBALL 

Lots of sound and flashing graphics make this 

fast action game so much like the real thing 

that you'll have to remind yourself not to 

"TILT" your TRS-80. 

16K protected disk. ..$11. 95 

16K protected disk. . .$20.95 

Unbelievable Realtime 3-D Graphics! 



FLIGHT SIMULATION 

From Sub-Loaic 

During FLIGHT SIMULATION, you instantly 
select instrument flight, radar, or a breath- 
taking pilot's-eye-view. But be sure to strap 
yourself in — you're liable to get dizzy! 

NOV/ FOR MODELS I 6 III! 

16K tape. ..$25.00 32K disk. .. $33. 50 



SCARF 
MAN 




From Cornsoft Group 

Race your Scarfman around a maze, gobbling 
up scoring dots. You are pursued by five 
monsters: if you eat a "+" they'll lower their 
eyes and you can eat them, otherwise they'll 
eat you! SCARFMAN may be played using the 
keyboard or Alpha Product's Joystick. 
WARNING: MAY BE HABIT-FORMING ! 

Tape. ..16. 95 

Disk (specify mod. I or II I) . . . $20. 95 

Alpha Joystick: 

mod. I: $39.95, mod. Ill: $49.95 




COSMIC 
FIGHTER 



By Hogue £ Konyu from Big Five 
While fighting off the alien convoys -- each 
more skillful than the last — you must keep 
track of your rocket fuel or risk explosion. 
16K tape. ..$15. 95 32K disk. . . $19. 95 




ATTACK 
FORCE! 



By Hogue 5 Konyu from Big Five 
Unlike the usual space "shoot-em-ups," 
Attack Force lets you control both speed and 
direction as you maneuver all over the screen 
in search of the alien Ramships and Flag- 
ships. 
16K tape. ..$15. 95 32K disk. . .$19. 95 




METEOR 

MISSION 

2 



By Hogue & Konyu from Big Five 
Six astronauts are stranded on a desolate 
planet. You must undock from your command 
module and maneuver your rescue shuttle 
through the asteroid field to save them. 
16K tape. ..$15. 95 32K disk. . . $19. 95 



COMING SOON: MYSTERIOUS ADVENTURES 
A new series of adventures from Acorn that is 
bound to keep you asking for more! 



THE PROGRAM STORE • Pept8 04Box96Q6- 4200 Wisconsin Ave, NW • Washington, D.C. 20016 
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New products. 




Model III Hi-res 




Micro Yellow Pages 

Micro Yellow Pages is a 32-page 
software directory/newsletter 
describing over 50 business 
software packages by Micro 
Architect Inc. 

Micro Yellow Pages had the first 
official issue dated September, 1978. 
The current issue describes several 
new packages for the IBM Personal 
Computer. For a complimentary 
copy of this newsletter, which 
features information on data base 
managers, inventory control and 
complete business systems, contact 
Micro Architect Inc., 96 Dothan St., 
Arlington, MA 02174. For 
immediate response, send a #10, self 
addressed, stamped (37 cents), 
envelope. Or, 
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New Color Computer game 

Circus Adventure, for the Color 
Computer is a game which provides 
a pleasant and positive approach to 
introducing children to the 
computer. The game runs on the 16K 
Color Computer. No extended 
BASIC or joysticks are required. It 
sells for $10. from Computer Island, 
227 Hampton Green, Richmond, NY 
10312 
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Radio Shack adds BASIC Faster 
and Better to library 

Radio Shack now offers 
programmers of the Model I, II and 
III a comprehensive volume of 
advanced information on techni- 
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ques for effective and efficient 
programming in BASIC. BASIC 
Faster and Better & Other Mysteries 
(62-1002) by Lewis Rosenfelder, is 
available for $29.95 at Radio Shack 
Computer Centers, stores and 
participating dealers. 

The author, a recognized 
programming authority, reveals 
innumerable short cuts, secrets, bits 
of what the author calls "trickery" 
and helpful hints for high 
efficiency, plus other advanced 
programming techniques. He offers 
extensive information on many 
topics, including shell programs, 
USR routines, "magic" arrays, 
strings, searches and sorts, utilities, 
number crunching, overlays, bit 
manipulation, memory mischief 
and more. In addition, a number of 
useful tables and listings have been 
incorporated into 11 appendices to 
this huge (8 l / 2 x 11 inch, just under 
300 page) reference, and an 
extensive subject index has been 
provided. 




The Grafyx Solution gives any 
configuration of a TRS-80 Model III 
a resolution of 512 x 192 for a total of 
98,304 individually accessible 
points. The included graphics 
package allows you to set and reset 
points, lines, rectangles, and 
complement or clear the screen 
using simple BASIC commands 
such as PLOT and LINE. Alternate 
resolutions of 256 x 192, 128 x 192 or 
128 x 96 are also possible. 

When enabled, the hi-res graphics 
screen is displayed on top of the 
normal character display. The 
Grafyx Solution is an add-on circuit 
board which contains 12,288 bytes 
of additional read/write memory 
that does not conflict with the TRS- 
80 address space. Upgrading your 
computer requires no soldering and 
is as easy as clipping on some micro- 
clips, cutting one trace and 
removing two IC's from sockets. 

Available for immediate delivery 
upon the receipt of a check or COD 
request for $299.95. Micro-Labs, 
Inc., 902 Pinecrest, Richardson, TX 
75080 (214) 235-0915. 
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New word processor 

Transformation Technologies 
has announced its C. C. Writer word 
processing program for the TRS-80 
Color Computer and the Radio 
Shack or Exatron disk systems. 
Disk C. C. Writer retains all of the 
features of the popular cassette C. C. 
Writer program plus adds features 
made possible by disk. Disk CCW 
allows full control of the margins, 
page length, line spacing, centering, 
justification and most features of 
"smart" printers. The powerful 
editing features allow changes, 
insertions, deletions and moves 
anywhere in the text. Files may be 
chained together for extended 
printing. Disk C. C. Writer requires 
32K, Extended BASIC, and one 
Radio Shack or Exatron disk drive. 
Disk C. C. Writer is $40 from 
TransTek, 194 Lockwood, Bloom- 
ingdale, IL 60108 
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.New products 



Daisy wheel printer under $700 

Model Olive- 1 Interface turns 
Olivetti Praxis-30 or -35 electronic 
daisy wheel typewriter into letter 
quality printer with RS-232C 
computer interface. The Model 
Olive-1 Interface is available 
completely assembled and tested, 
with interface cables and detailed 
instructions for attachment to 
Praxis-3X, typewriter function is 
unimpaired, priced below $200; 9 
VCC/300 ma wall socket plug-in 
power supply is optional. The Model 
Olive-80 Printer Package, including 
the Praxis-30 and Olive-1 Interface 
plus full documentation, is priced 
below $700. The package with the 
Praxis-35 is slightly higher. For 
more information contact The Olive 
Branch Association, Ltd., 1426 W. 
Winton Ave., Hayward, CA 94545 
(415) 887-4716 
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New RS232C Interface 

VR Data is proud to announce the 
availability of the VR-RS232C. The 
VR-RS232C is a plug-compatible 
serial interface for the TRS-80 
Model III. It features a program- 
mable baud rate generator from 50 
to 19,200 baud, fully interrupt 
driven, programmable pin out to 
eliminate special cables (modem 
output standard), reverse polarity 
protection, programmable UART, 
user prototyping area for special 
applications such as 20 ma current 
loop, relays or lamp drivers-. 
Internal installation can be made 
with simple hand tools. No 
soldering or other component level 
work is required. Retail price is 
$75.00. VR Data Corp., 777 
Henderson Blvd., N-6, Folcroft 
Industrial Park, Folcroft, PA 19032 
(215) 461-5300 
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Pocket Computer interface New coupon shopping program 




With the Protean Scientific PTR 
Interface you can now use the TRS- 
80 Pocket Computer as a portable 
data logging device and transfer 
your data quickly and easily to a 
TRS-80 desktop unit. 

The complete PTR package is 
being introduced at $99.95 plus 
$2.50 shipping and handling. To 
order or for more information 
contact Protean Scientific, Route 13, 
Lincoln, NE 68527 
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Softbyte Computing has 
organized a way of keeping records 
of redeemable coupons. Up to 99 
coupons, their brand names, values 
and expiry dates can be stored. 

A stored list of 160 grocery items 
(more can be added) is available and 
shopping lists from these and a 
symbol next to items having a 
coupon will appear. The program 
will total up coupon deductions. 
Available on cassette for TRS-80 
Model I and III for $9.95 from 
Softbyte Computing, PO Box 217, 
Wallingford, CT 06492 
Circle #128 
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TRS-80* Computer Owners. 



GREATER VALUES 
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Model III Disk D 
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Complete First-Drive Systems 

from \PH"^F5/ 

Internally mounted drives that feature double- or 
single-density storage, comprehensive pre- 
delivery testing, 48-hour burn-in and, best of all, 
Percom's widely acclaimed disk controller. A 
First-Drive System includes the four-drive disk 
controller, one or two drives, power supplies, 
cables and a fully illustrated owners manual. Use 
Model III TRSDOS*, Percom OS-80+ and all 
other Model III compatible DOSs. 

Note: If you prefer not to make the First-Drive 
System installation, we'll do it for only $29.95 
plus shipping. This includes a 48-hour operat- 
ing burn-in of your Model III computer, instal- 
lation of the drive system and final checkout 
of the expanded system. 



Our Own Fully Tested Drives 

from only $275 

Every Access Floppy Disk drive is electrically tested, mechanically tested and 
burned-in 48 hours under operating conditions. Look for the signed test list in 
the shipping carton. 

AFD drives are capable of either single- or double-density operation. Store up 
to 364 Kbytes (formatted) in double density. Store twice the data on a single 
diskette using AFD "flippy" drives." 

15-day free trial offer... comprehensive 90-day limited warranty... unbeatable 
prices... AFD- 100 @ $275.00, -100F @ $329.00, -200 @ $429.95, -200F @ 
$449.95. 



How to order-Order by calling Access Unlimited toll-free on 1-800-527-3475. Or order by mail. 
Orders may be charged to a VISA or Master Card account, or paid by cashier's check, certified 
check or money order. COD orders require 25% deposit. Sorry, we cannot accept personal 
checks. We pay freight (surface only) and insurance charges for shipments in U.S. on orders 
over $1 ,000.00. Add approximate insurance and shipping charges for orders under $1 ,000.00. If 
in doubt about these charges, ask when you call in your order. Texas residents include 5% sales 
tax. Minimum mail order $20.00. Allow 2 to 4 weeks for delivery. 

: Technical & Texas: (214) 340-5366 

Save! VISA and Master Card charges are not deposited 
until the day your order is shipped. 



PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE. 



Everybody's Favorites - for Less! 



Percom Data Separator 


$23.95 


Green Screen I, II, or III 


$18.95 


Head Cleaning Kit 


$24.95 


Drive Numbering Tabs (pkg 0-3) 


$3.00 


5 1 /." Flip-N-File 


$24.95 


8" Flip-N-File 


$39.95 
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LOWER PRICES 




Percom's Proven DOUBLER ll f 

Upgrade Your Model I to Double Density for 

only $159.95 

And not with some unproven hacker's kit, either. But with an assembled and fully 
tested Percom DOUBLER-ltf. The DOUBLER-llt simply plugs into the disk drive 
controller socket of your Expansion Interface. Then it lets you store over four 
times more on one side of a diskette, depending on the drive, than you can store on 
standard Tandy Model I drives. Other features: • Reads, writes and formats either 
single- or double-density • Includes DBLDOS"", a TRSDOS* compatible disk- 
operating system -Runs TRSDOS*, NEWDOStt, Percom OS-80t and other 
single-density software immediately. Change to double-density operation when con- 
venient • Lets Model III software be read on your Model I • Includes on-card high- 
performance data separation and write precompensation circuitry. 



Incredibly Low Prices for Epson and Okidata Printers! 

The two most popular printers on the 
market today. They provide the features 
you want, the reliability you need, a price 
you can afford. 

MX-80 - Call for latest low price. 



Microline 80 only $399.95 

Other models available. 





Low Cost 
System Furniture 

Modular design permits cus- 
tom arrangements • Furniture 
styling and quality • TRS-80* 
colors • OK for UPS shipping 
• Reassemble without tools 

System desks from $115 
Printer stands from $144 



Arrick Products Quick-Switch^ 

Just flick a switch to connect your TRS-80* printer port from device #1 to 
device #2. Or, "Quick-Switch" a peripheral between computers. Versions 
for RS-232 or Centronics interfacing. Includes 5-foot 34-pin cable with 
card-edge socket, box-mounted 34-pin card-edge plugs. From $79.95. 

* trademark of Arrick Products Company. 



Save! Make ACCESS your one-call shopping center for TRS-80* 
hardware and software. Call our toll-free order number for free 
product literature and latest prices. 



Toil-Free 
Order No. 



1 -800-527-3475 



o 



ACCESS UNLIMITED 



'"Trademark of Access Unlimited 
"(Trademark of Percom Data Company, Inc. 



(orders & literature only) 



401 N. Central Expressway #600 
Richardson, Texas 75080 
(214) 340-5366 

"Trademark of Tandy Radio Shack Corporation. 
ttTrademark of Apparat Corporation. 
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Space photography 
at J. P. L. 

Jet Propulsion Laboratories uses 
TRS-80 interface to photodensitometer 



Harry Avant, La Cresccnta, CA 



This article describes a hardware 
interface that is currently being 
used in the Mission and Test Photo 
System of the Jet Propulsion Lab in 
Pasadena, California. A TRS-80 
microcomputer is used in 
conjunction with the hardware 
described to acquire, store and 
manipulate photographic density 
and temperature data in a high 
volume photographic processing 
facility. The data is generated in 
conjunction with the production of 
photographic images from 
unmanned interplanetary space- 
craft such as Voyager. The interface 
provides for 24 bits of I/O that can 
be expanded to 96 bits if required. 



Introduction 

During the past two or three 
years, small "personal" type 
computers have been utilized in 
increasing numbers within large 
industrial-type environments. One 
of the more common applications 
for these types of computers is in the 
area of equipment and process 
control. 

This article describes an interface 
that is currently used to couple 
photographic densitometers and a 
temperature indicator to a TRS-80. 
A view of the equipment is shown in 
photograph 1. 

Attached to the TRS-80 are the 
following: two densitometers (only 
one is shown in this view), a second 
monitor, three disk drives, one 



cassette recorder, a Radio Shack 
Line Printer II, an Axiom 801P 
printer, a Micromint I/O port with 
parallel and 232C ports, a 
Micromint Digitalker, constant 
voltage transformer, line spike 
suppressor, and finally, the 
interface that is described in this 
article. This interface is the long box 
just above the TRS-80 monitor. At 
first glance, it appears that we have 
made an effort to see just how many 
things can be attached to a TRS-80, 
but each of the items is extensively 
used on a daily basis. 

This equipment is located within 
the Mission and Test Photo System 
(MTPS) group of the Photo Lab 
located at the Jet Propulsion 
Laboratory in Pasadena, Califor- 
nia. The Mission and Test Photo 
System is a high volume 
photographic processing facility 
dedicated to the production of black 
and white photo products from 
unmanned interplanetary experi- 
ments. Products produced by the 
MTPS are used for scientific 
investigations, which places 
stringent requirements on the 
facility to maintain very high 
standards in terms of quality 
control. 

The MTPS produces 5 by 5 inch 
film (both negatives and positives), 
5 by 5 inch contact prints, and 10 by 
10 inch enlargements. This facility 
is capable, over short periods, of 
producing up to 65,000 pieces per 
week, although 35,000 per week is 



more typical. In addition to 
production requirements, MTPS 
also assists in the calibration of 
digital film recorders that convert 
data to photographic film. 

In order to adequately monitor 
quality of the items produced, huge 
amounts of data are acquired. As an 
example, during the recent Voyager 
exploration of Jupiter, more than 
15,000 density measurements were 
made on various tests, and chemical 
process monitoring. (Density as 
used here refers to photographic 
density which is a measurement of 
how dark a photographic image is. 
The instrument used to measure 
density is called a densitometer.) 
These measurements were made 
over a period of sixteen months in 
conjunction with production of 
800,000 of the photographic 
products described above. When 
faced with 30,000 numbers to 
describe the quality of 800,000 
products, a computer becomes very 
necessary! 

Background 

Prior to 1977, data from various 
measurements was being hand 
copied onto pre-printed forms which 
were stored by category in three- 
ring notebooks — many notebooks, I 
might add. In order to utilize the 
data, it was necessary to enter it into 
conventional calculators for 
computations. Not only was this 
very slow, but offered the chance for 
error both in entering data into the 
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notebook records, and reentering it 
into a calculator. 

In an attempt to partially 
automate some calculations, a 
dumb terminal communicating 
with a very large main frame 
computer was utilized. Data from 
notebook records was entered into a 
data base resident in the main 
frame. This was some improvement 
in that the data base was able to 
perform complex sorting and 
limited statistical analysis. 

As anyone who has ever had to 
contend with time sharing on a 
large system knows, access was not 
always possible. Many times when 
data was needed in a hurry, it was 
necessary to wait to gain access. In 
addition, a very large computer's 
time is not inexpensive. We soon 
discovered that on-line terminal 
time per year could easily cost more 
than a small stand-alone computer 
system. A main frame was not 
helping with the problem of human 
errors, either. There was still the 
occurrence of erroneous entries into 
notebooks and more errors in 
reading notebook data and entering 
it into the computer. 

Our next consideration was the 
possibility of interfacing some 
measuring equipment directly to the 
main frame. This was rejected, 
based on hardware cost of 
interfacing equipment. There was 
still the problem of access to the 
main frame. 

We considered the possibility of 
acquiring a small computer, 
interfacing it with some measure- 
ment equipment and storing data on 
disk or tape for later transmission to 
the main frame through modem. An 
investigation of probable costs, 
again, of using a large computer to 
store and manipulate data, lead us 
to the decision to do it all with a 
small computer. 

A 48K two disk TRS-80 Model I 
was purchased by the lab and 
training of quality control 
personnel in BASIC language 
programming began. A simple 
prototype interface, using an 8255 
programmable interface chip, was 
constructed as well as a 
"densitometer simulator." The 
prototype seemed to function quite 
well and it was installed in the lab 
for a couple of weeks to determine 
how well the TRS-80 and its 




Overview of the equipment setup in the MTPS. Photograph provided through the 
courtesy of the Jet Propulsion Laboratory, California Institute of Technology, 
Pasadena, California. 

Photo 1 




Detail photograph of main circuit board in interface. Photograph provided through the 
courtesy of the Jet Propulsion Laboratory, California Institute of Technology, 
Pasadena, California. 

Photo 2 
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interface would perform. Since there 
were no problems encountered, the 
design and construction of a final 
version of the interface was 
initiated. 

Photo 2 shows the parts layout of 
the main board. Currently, this 
interface is being used in 
conjunction with two photographic 
densitometers and an eight-channel 
digital temperature indicator. One 
of the densitometers is a MacBeth 
model TD504 transmission type and 
the other is a MacBeth model TR527 
reflection type. Both of these are 
digital readout instruments 
utilizing three, seven-segment 
numerical displays each, and 
equipped with BCD digital outputs 
on their rear panels. An interesting 
feature of the BCD outputs is that 
they are negative logic — a (one) is 
false, and a (zero) is true. 

Each densitometer is equipped 
with a nine-column printer to 
provide hard copy records of 
measured density. The nine-column 
printers are designed to accept BCD 
data and are directly coupled to the 
output of each densitometer with no 
external interface. The digital 
temperature meter is a four-digit 
liquid crystal display equipped to 
handle eight temperature sensors. 

There are seven high speed film 
and paper processors in the lab. 
Each one is monitored by a separate 
sensor, with one sensor unused. 
This meter also has BCD 
information brought out to the rear 
panel. In addition, the temperature 
indicator is multiplexed by a three- 
bit "word" to allow it to read any of 
the eight temperature sensors. 
Sensor selection may also be 
controlled by a front panel switch on 
the meter. 

Hardware Description 

Three 8255A programmable 
interface chips provide the heart of 
the circuit. Although the 8255 was 
designed with the 8080 microproces- 
sor in mind, it is a general purpose 
I/O device that is compatible with 
most current microprocessor chips. 
An 8255 provides 24 I/O lines that 
may be configured in various 
groupings by supplying an 
appropriate control word. Four 
ports are available as I/O for this 
device, two with eight bits each, and 
two with four bits each. 
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Independent port programming is 
accomplished by choice of the 
control word used. 

Intel, the designer of this device, 
publishes an excellent application 
and data sheet, Application Note 
AP-15, "8255A* Programmable 
Peripheral Interface Application." 
As stated in the application note, it is 
possible to program the device as 
three independent ports, as well as 
several other useful configurations 
by proper choice of the control word 
used. In this application, a control 
word (155 decimal) is used to 
configure the chip's three, eight-bit 
ports as input only, with each port 
operating independently of the 
others. 

The 8255 chips are memory 
mapped into a region of two 
thousand bytes of unused memory 
locations which start at 12288 (3000 

At first glance, it appears 
that we have made an 
effort to see just how many 
things can be attached to a 
TRS-80, but each of the 
items is extensively used on 
a daily basis. 

Hex) in a Model I. Memory mapped 
addressing was selected because it 
allows for a very large number of 
locations to be used and does not 
interfere with some of the port 
addressed devices that are also used 
with this particular configuration. 

Software 

A complete discussion of the 
software used in conjunction with 
this interface is well beyond the 
scope of this article. What follows is 
a brief outline of the drivers used for 
programming the 8255s and 
converting the BCD data into 
binary form. A typical input and its 
conversion follows. 

Assume that a densitometer 
reading of 3.45 occurs. The BCD 
equivalent of this reading is: 

0011 0100 0101 
However, the densitometer has 
negative true logic which results in: 

1100 1011 1010 
Considering the first two digits, 3 
and 4, the 1100 1011 is equal to 
decimal 203, NOT 203 + 256 = 52, 



which in binary is: 

0011 0100 
AND with 15 (binary 0000 1111) 
then: 

0011 1111 AND 

0000 1111 
result 0000 0100, or 4 in decimal, 
which is the middle digit. 

Now, take the binary 52, and AND 
it with 240. We get: 

0011 0100 AND 

0000 1111 

result 0011 0000, or 48, in decimal. If 
this is divided by 16, the result is 3, 
which is the leading digit. The most 
significant and middle digit has 
now been recovered. For the least 
significant digit: 

0101 xxxx in binary 

1010 0000 in negative true 
This is equal to 160. A NOT(160) is 
equal to -161, and adding 256, equals 
95, which in binary is: 

0101 1111 
This is ANDed with 240 as follows: 

0101 1111 AND 

1111 0000 
result: 0101 0000, which is equal to 
80 decimal. This is divided by 
sixteen to compensate for the 
positional factor, resulting in 5, 
which is the least significant digit of 
the original reading. 
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r\e0seometry to locate satellites 



Dana Waldman and Mark Felton, Denver, CO 



A major portion of the satellites that are used today sit 
in an orbit over the equator some 22,214 miles from 
earth. The reason for this orbital path is that satellites 
placed in this "geosynchronous" orbit will revolve with 
the earth, and therefore, remain continuously over the 
same spot on the earth. This fixed orbit makes pointing 
much easier, with no need to track the satellite. The 
telescope or antenna can be pointed only once, then 
locked into place. 

For those involved in either amateur or professional 
antenna or telescope work, the question still remains, 
"How does one find the various geosynchronous 
satellites?" The program in this article was developed 
on a TRS-80 Model I using BASIC Level II and TRS- 
DOS. It uses spherical geometry to locate the 
"geosynchronous" satellites over the contiguous United 
States. It allows entry of up to 20 satellites and their 
longitudes into a satellite data file. The program uses 
this information to calculate the direction (azimuth) 



Satellite 



Longitude 



Comstar 1 128 

Comstar 2 95 

Comstar 3 87 

Satcom 1 135 

Satcom 2 119 

Satcom 3R 131 

Westar 1 99 

Westar 2 123.5 

Westar 3 91 

Anik 1 104 

Anik 2 109 

Anik 3 114 



and elevation angle from the ground that the antenna 
or telescope should point to find the satellite. A list of 
satellites and their longitudes (west) in degrees are 
given below. 
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This program allows satellites to be added or changed 
to handle future changes in orbit. 

Since the program requires the longitude and latitude 
coordinates of the location on the earth to tell how to 
point the antenna, you will need a source of longitudes 
and latitudes for the locations of interest. Most public 
libraries have an atlas which will give you the 
necessary information. 

In addition, the program asks for the declination 
angle of your location. Declination angle corrects for the 
difference (slight) between the true North Pole (the 
northern point of the spin axis of the earth) and the 
magnetic North Pole (the place where a compass points 
when it says "north"). This angle can be obtained by 
calling the closest airport or a local surveyor. 

The magnetic azimuth is the direction which includes 
the correction of the declination angle. If the declination 
angle is zero, the magnetic azimuth and the true 
azimuth will be the same. You should use the magnetic 
azimuth if you are pointing at the satellite with a 
compass. The true azimuth may be required if you are 
using surveyor's maps. 

The outputs of the program's calculation are the true 
azimuth, the magnetic (compass) azimuth and the 
elevation angle. Most hardware stores have an angle 
measuring instrument called an inclinometer if your 
antenna or telescope won't give you the elevation. 

Mathematically, the program is based on spherical 
geometry. If you draw the earth as a sphere, then locate 
the lines from the center of the earth to any location on 
the earth and outward through the equator to the 
satellite in orbit, the required geometry begins to 
emerge. Now, draw a tangential plane at the earth's 
location, draw a line from it to the satellite. With a little 
bit of knowledge of spherical geometry and ability to 
read the basic program, you can derive the equations. 

The program is interactive and easy to operate. When 
the program is run, the main menu appears: 

**** MAIN MENU ***'* 

1. Azimuth & Elevation Calculation 

2. Maintain Satellite Longitude Table 

3. End Program 

Enter Function 



To change the fourth satellite (Satcom 1), key in 4. The 
program asks for the satellite's new name and 
longitude, writes the new data back into the file, then 
redisplays the satellite table. 

Now you are ready to use this data to calculate the 
azimuth and elevation angle. Go back to the main menu 
and choose Function 1. At the prompt: ENTER THE 
SATELLITE NAME, key in the name of the satellite at 
which you want to point. The program searches the 
satellite table for this name and, if no match is found, it 
will ask for the name again. When it finds the name in 
the file, it uses the longitude to calculate true azimuth, 
magnetic azimuth and elevation angle. 

Here are some sample points and calculations: 



NEW YORK 

Lat 40.78 

Long 73.96 

Dec. Angle -12.38 

CLEVELAND 

Lat 41.46 

Long 81.61 

Dec. Angle +5.90 

BOSTON 

Lat -,. 42.36 

Long 71.08 

Dec. Angle +15.54 

DENVER "* 
Lat 39.75 

Long 105.00 

Dec. Angle -11.85 

PHOENIX 

Lat 33.48 

Long 112.06 

Dec. Angle -12.79 

LOS ANGELES 

Lat 34.05 

Long 118.25 

Dec. Angle -14.21 



WESTAR 1 

True Az 215.574 

Mag. Az 227.954 

Elevatn 36.3181 

SATCOM 3R 

True Az 240.417 

Mag. Az 246.317 

Elevatn 21.0826 

ANIK1 

True Az 223.857 

Mag. Az 239.397 

Elevatn 30.877 

SATCOM 1 

True Az 222.079 

Mag. Az 210.229 

Elevatn 34.5937 

WESTAR 3 

TrueAz 145.084 

Mag. Az 132.294 

Elevatn 44.9678 

COMSTAR 3 

TrueAz 132.698 

Mag. Az 118.488 

Elevatn 38.2805 



Function 1 allows the entry of data into the file 
"SATFIL/DAT". This file will be created on your disk if 
it does not exist. At the prompt: ENTER SATELLITE 
NAME ( 'END' TO EXIT ), key in a name of up to 15 
characters. To go back to the second menu, key in END. 
At the prompt: ENTER SATELLITE LONGITUDE, 
key in longitude, in degrees. The table will hold up to 20 
satellites. 

Function 2 of the second menu, displays the satellites 
on file. The satellites have been numbered 
automatically when entered. For example: 



Westar 1 
Westar 2 
Westar 3 
Satcom 1 



99 

123.5 

91 

135 



WHICH SATELLITE # DO YOU WANT TO CHANGE 

('0' TO EXIT). 
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Dana Waldman (programmer) and Mark Felton 
(communications engineer) have worked together for a 
number of years on the technical staff of International 
Communications Experts, Corp. Dana Waldman 
presently works for Automated Business Systems, Inc. 
Mark Felton is employed in the Denver office of 
Scientific Atlanta (cable division). 

A complete version of this program on disk can be 
obtained by sending $65.00, your name and address to: 
SATCALC/BAS, 1128 Bannock St., Denver, CO 80204. 

Program Listing for 
Geosynchronous Satellite Pointing 

10 REM SATCALC/BAS 

20 REM GEOSYNCHRONOUS SATELLITE 

30 REM POINTING PROGRAM 

40 REM 



Feature program 



50 REM MAIN MENU 

60 OPEN "R",1,"SATFIL/DAT" 

70 FIELD 1, 15 AS SA$, 8 AS SL$ 

80 REM SATFIL/DAT RECORD - SA$ 15 CHAR 

SATELLITE NAME 
90 REM SL$ 8 PLAC 

ES FOR SAT LONGITUDE 
100 CLS 

110 PRINT @140, "**** MAIN MENU ****" 
120 PRINT @262,"1. AZIMUTH & ELEVATION 

CALCULATION" 
130 PRINT @390,"2. MAINTAIN SATELLITE L 

ONGITUDE TABLE" 
140 PRINT @518,"3. END PROGRAM" 
150 PRINT @646, "ENTER FUNCTION" 
160 INPUT OPT% 

170 ON OPT% GOSUB 860, 210, 1360 
180 GOTO 100 
190 REM 
200 REM 
210 REM MAINTAIN SATELLITE LONGITUDE 

TABLE 
220 CLS 

230 PRINT @262,"1. ADD A SATELLITE" 
240 PRINT @390,"2. DISPLAY/CHANGE SATEL 

LITE TABLE" 
250 PRINT @518,"3. RETURN TO MAIN MENU" 

260 PRINT @646, "ENTER FUNCTION" 

270 INPUT OPT% 

280 ON OPT% GOSUB 320, 500 

290 RETURN 

300 REM 

310 REM 

320 REM ADD A SATELLITE 

330 I*=£X)F(1) : REM GET FILE 

RECORD COUNT 
340 IF L%<20 GOTO 370 : REM MAXIMUM 

OF 20 SATELLITES 
350 PRINT "SATELLITE TABLE FULL - CANNO 
T ADD (PRESS 'ENTER' TO CONTINUE)" : 

INPUT OPT% 
360 GOTO 210 
370 PRINT : PRINT "ENTER SATELLITE NAME 

( 'END' TO EXIT )" 
380 INPUT SN$ 
390 IF SN$="END" GOTO 470 
400 PRINT "ENTER SATELLITE LONGITUDE" 
410 INPUT SL# 
420 LSET SL$s44KD$(SL#) 
430 LSET SA$»SN$ 
440 L%=LOF(l)+l 
450 PUT 1,1* : REM WRITE TO DATA FI 

LE 
460 GOTO 340 
470 RETURN 
480 REM 



CHANGE SATELLITE TABLE 



490 REM 
500 REM 
510 CLS 
520 PRINT @10, "SATELLITE LONGITUDE TABL 

E" 
530 L%=0 : REM RECORD # 
540 Vl%=2 : REM LINE # ON CRT 
550 V3%=0 : REM TAB ON CRT 
560 L%=L%+1 

570 IF I*>LOF(l) GOTO 710 
580 IF L%>20 GOTO 710 
590 IF V3%=0 THEN VL%^V1%+1 
600 IF Vl%<14 THEN 620 
610 CLS 
620 V2%=(V1%*64)+V3% : REM GET PRINT 

POSITION 
630 GET 1,1* 
640 SL#=CVD(SL$) 
650 PRINT @V2%,I* 
660 PRINT @V2%+5,SA$ 
670 PRINT @V2%+23,SL# 
680 V3%=V3%+34 
690 IF V3%>34 THEN V3%=0 
700 GOTO 560 
710 PRINT @833, "WHICH SATELLITE # DO TO 

U WANT TO CHANGE ( '0' TO EXIT)" 
720 INPUT OPT% 
730 IF OPT%>LOF(l) THEN 710 
740 IF OPT%=0 THEN 210 
750 PRINT 0833, OPT%," ENTER SATELLITE N 

AME 
760 INPUT SN$ 
770 PRINT @833,OPT%,SN$," ENTER LONGITU 

DE " 
780 INPUT SL# 
790 LSET SA$=SN$ 
800 LSET SL$=MKD$(SL#) 
810 PUT l,OPT% : REM WRITE TO DAT 

A FILE 

820 PRINT @833," 
it 

830 GOTO 500 

840 REM 

850 REM 

860 REM CALCULATICN ROUTINE (TRUE & 

MAGNETIC AZIMUTH, ELEVATION) 
870 BL$=" " 
880 GOTO 900 

890 PRINT "SATELLITE IS NOT ON FILE" 
900 PRINT 
910 PRINT "ENTER SATELLITE NAME ( 'END* 

TO EXIT )" 
920 INPUT SN$ 

930 IF SN$="END" THEN 1330 
940 IF LEN(SN$)>15 THEN 890 : REM NAM 

E CAN'T BE > 15 CHARS 
950 IF LEN(SN$)=15 THEN 980 
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SOFTWARE 

TRS/PMC ONLY 

UNBEATABLE PRICES! 



DISK 



LIST/OUR 

'I 



PRICE 



BUSINESS 
Smalt Business Systems Group 

Accounts Payable (48) 195.007t55.00 

Accounts Receivable (48) 195.00/155.00 

General Ledger (48) 195.00/155.00 

Inventory Control (48) 195.00/155.00 

Payroll (48) 195.00/155.00 

GAMES 

Adventure International 

Armor Patrol 24.95/19.00 

Barlog - Maces and Magic #1 29.95/23.00 

Conquest ot Chestwood 20.95/16.00 

Earthquake San Francisco 1906 (I) 20.95/16.00 

Eliminator 24.95/19.00 

Lunar Lander 20.95/16.00 

Missle Attack 20.95/16.00 

Morton's Fork - Maces and Magic #3(1) 29.95/23.00 

Planetoids 20.95/16.00 

Scot Adam's Adventure #1 #2 #3 39.95/31.00 

Scot Adam's Adventure #10 #11 #12 39.95/31 00 

Scot Adam's Adventure #4 #5 #6 39.95/31.00 

Scot Adam's Adventure #7 #8 #9 39.95/31.00 

Sky Warrior 20.95/16.00 

Space Intruders 20.95/1600 

Star Fighter 29.95/23.00 

Star Trek 3.5 19.95/15.00 

Stone ol Sysiphus • Maces and Magic #2 (I) 29.95/23.00 

Big Five 

Attack Force 19.95/15.00 

Cosmic Fighter 19.95/15.00 

Defense Command 19.95/15.00 

Galaxy Invasion 19.95/15.00 

Meteor Mission 1 9.95/1 5.00 

Robot Attack 19.95/15.00 

Super Nova 19.95/15.00 

Cornsoft 

Scarlman 1 9.95/1 5.00 

Space Castle 19.95/15.00 

INFORMATION PROCESSING 

Adventure International 

Maxi Manager (48) 



99.95//9.00 



OPERATING SYSTEMS 

Micro Systems Software 

Dos Plus V3.3 (I) 



100.00/80.00 



UTILITIES 
Howe 

M0N3 (0 rva 

MOW (0 49.95/39.00 

STERM(I) rva 

System Diagnostic 99.95/79.00 

WORD PROCESSING 

Michael Shrayer Software 

Electric Pencil (I) rva 

Aspen Software 

Grammatik (I) 59.00/46.00 

Proof Edit (I) ... 30.00/23.00 

Proofreader (I) 54.00/42.00 

Soft-Screen (I) (48) 69.00/54.00 

Soft-Text (I) (48) 69.00/54.00 

MISCELLANEOUS 

Adventure 1 thru 12 - Hints Sheets 

Box of 10 5%-inch Diskettes 

Box of to C-10 cassettes 

Box of 10 C-20 cassettes 

Box of to C-60 cassettes 

Box of 10 C-90 cassettes 

PGMS will run on Mod I 



CASS 
LIST/OUR 



PRICE 



rva 
rva 
rVa 
rVa 

rva 



19.95/15.00 

rva 
19.95/15.00 
19.95/15.00 
19.95/15.00 
14.95/11.00 
14.95/11.00 

rVa 
19.95/15.00 

rVa 

n/a 

rva 

rVa 
14.95/11.00 
19.95/15.00 
24.95/19.00 
14.95/11.00 

rva 

15.95/12.00 
15.95/12.00 
15.95/12.00 
15.95/12.00 
1595/1200 
15.95/12.00 
15.95/12.00 

15.95/12.00 
15.95/12.00 



39.95/31.00 

rVa 
69.95/5500 

rva 



100.00/24.00 

rVa 
n/a 
rVa 
rVa 
rVa 



1.00 

25.00 

7.50 

9.00 

11.00 

15.00 

Mod III, 32 DSK or 16K CAS UNLESS Marked. 



(48): 48K DSK e Mod I A III 



(I): Mod I only (DSK +/or CAS) 



PMC s OFTWARE 

475 ELLIS ST., MT. VIEW, CA 94043 
Order Only CALL (415) 962-0318 

Information CALL (415) 962-0220 

Terms: FOR FAST DELIVERY, send certified checks, money orders. Visa or Master Card number and expiration 
date Personal checks require 3 weeks. USA sales only. Prices include U.P.S. continental delivery (do not use P.O. 
Box). CALIFORNIA customers add 6%% tax. Prices subject to change. 
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Feature program 



960 SN$=SN$+BL$ : REM ADD TRAILING 

BLANKS FOR 15 CHAR NAME 
970 GOTO 950 
980 L%=0 
990 I£=L%+1 : REM ADD TO DATA FI 

LE RECORD COUNT 
1000 IF L%>LOF(l) GOTO 890 
1010 GET 1,L% : REM READ DATA FI 

LE 
1020 IF SN$<>SA$ GOTO 990 : REM IF NO 

MATCH, READ AGAIN 
1030 SL#=CVD(SL$) 

1040 PRINT SN$," LONGITUDE = ",SL# 
1050 PRINT 
1060 PRINT "ENTER SITE LATITUDE IN DEGR 

EES" 
1070 INPUT L# 
1080 PRINT "ENTER SITE LONGITUDE IN DEG 

REES" 
1090 INPUT M# 
1100 PRINT "ENTER ANGLE OF DECLINATION 

IN DEGREES ( - IF EAST, + IF WEST)" 
1110 INPUT LD# 
1120 S1#=SL#*0.0174533 : REM SAT LAT 

ITUDE IN RADIANS 
1130 LI #=L#*0. 0174533 

TITUDE IN RADIANS 
1140 M1#=M#*0.0174533 

NGITUDE IN RADIANS 
1150 D1#=S1#-M1# 

TE TRUE AZIMUTH 
1160 Al#=iATN(TAN(Dl#)/SIN(Ll#)) 
1170 AT#=180.0+A1#*57.2958 
1180 ATl=AT# 
1190 PRINT 

1200 PRINT "TRUE AZIMUTH ",ATl 
1210 AM#=AT#+LD# : REM CORRECT TRUE 

AZIMUTH TO MAGNETIC AZIMUTH 
1220 AMl=^AM# 

1230 PRINT "MAGNETIC AZIMUTH", AMI 
1240 D2#=( (COS(Dl#)*COS(Ll#))-0. 15126) 

: REM CALCULATE ELEVATION 
1250 D3#=SQR(SIN(Dl#)*SIN(Dl#)-fCOS(Dl#) 

*COS(Dl# ) *SIN(L1# ) *SIN(L1# ) ) 
1260 D4#=D2#/D3# 
1270 E1#=ATN(D4#) 
1280 E#=E1#*57.2958 
1290 El=E# 

1300 PRINT "ELEVATION ",EJ 
1310 PRINT 
1320 GOTO 900 
1330 RETURN 
1340 REM 
1350 REM 

1360 PRINT "PROGRAM END" 
1370 CLOSE 1 
1380 END - 



REM SITE LA 



REM SITE LO 



: REM CALCULA 
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Make the most of your 

TRS-80 with Wiley's 

popular guides 



Whether you're a novice programmer or an adept computer user, 
our inexpensive paperback guides let you exploit the full potential of your TRS-80 
micro- for work, for pleasure, and everything in-between. 



TM 



TRS-80™ BASIC 

Bob Albrecht, Don Inman, & 
Ramon Zamora 

"OUTSTANDING ... the best thing to 
happen to Level II owners." 
-Computronics Monthly News 
"If you're a rank beginner. . .your novice 
status won't last long. TRS-80 BASIC 
leads you by the hand through the 
maze of programming the computer to 
perform both entertaining and useful 
tasks "-Interface Age 
"Anyone with access to the proper 
home computer will be able to write 
programs within a few days." 
-Science Books and Films 
(0 47106466-1) 1980 
351 pp. S8.95 

THE TRS-80™ MEANS 
BUSINESS 

Ted G. Lewis 

Written specifically for business com- 
puter users, this hands-on manual is the 
first guide to the best-selling Radio 
Shack Model II Computer. You'll discover 
a wide variety of applications that will 
turn your system into a powerful "filing 
cabinef'-while making your business a 
lot more manageable. Many ready-to- 
run programs are included and the most 
difficult aspects of file structure pro- 
gramming are simplified. 
(0 47108239-2) 1982 
194 pp. S12.95 

accompanying program disk 
(0 47186798-5) $19.95 

PROBLEM-SOLVING ON 
THE TRS-80™ POCKET 
COMPUTER 

Don Inman & Jim Conlan 
This step-by-step manual shows you 
how to use your TRS-80 pocket com- 
puter to solve virtually any educational 
or practical problem. Easy-to-follow 
demonstration problems familiarize you 
with the machine's own BASIC dialect, 
its keyboard, and its special operating, 
editing, and programming features. 
(0 47109270-3) 1982 

255 pp. 58.95 



MORE TRS-80™ BASIC 

Don Inman, Ramon Zamora, & 
Bob Albrecht 

This exciting new interactive guide 
teaches scores of practical, recreational, 
and educational applications- including 
supergraphics, file techniques, anima- 
tion, games, and versatile programming 
tools. 

(0 47108010-1) 1981 
280 pp. S9.95 



TRS-80™ COLOR BASIC 

Bob Albrecht 

This self-paced manual lets you get 
maximum use from your TRS-80 Color 
Computer while it teaches you the fun- 
damentals of BASIC programming. 
Abundant games, experiments, and pro- 
gramming problems and solutions help 
you explore the recreational, educa- 
tional, and home applications of this 
fun and friendly machine. 
(0 471 09644-X) April 1982 
approx. 1 92 pp. $9.95 

8080/Z80 ASSEMBLY 
LANGUAGE 
Techniques for 
Improved 
Programming 

Alan R. Miller 

A step-by-step, top-down approach 
to assembly language programming. 
Over 100 pages of programs let you 
develop, write, and test your own rou- 
tines. "This book is for intermediate and 
advanced programmers, but its clarity 
and organization can provide even a 
beginning programmer with an avenue 
to advanced techniques'-lnterface 
Age 

'An extremely useful book. . .gives 
plenty of examples to follow." 
-Computing Reviews 
(0 471 08124-8) 1981 
318 pp. $10.95 



DATA FILE 
PROGRAMMING IN 
BASIC 

Leroy Finkel & Jerald R. Brown 
"A comprehensive guide to the mysteri- 
ous world of data files. ... It will open up 
a whole new world of computing-a 
greatly extended repertoire of func- 
tional uses for one's microcomputer." 
-Interface Age 

"If you've been wanting to learn data 
base programming. . .or if you just need 
a good reference manual, this book is 
the one -REMarkable Software 
(0 471 08333-X) 1981 
338 pp. $12.95 

FAST BASIC 

Beyond TRS-80™ BASIC 

George Gratzer with Thomas G. Gratzer 
You can vastly increase your computer's 
speed and efficiency by programming it 
in FAST BASIC-exciting new techniques 
developed to make your programs more 
powerful. You'll master 20 assembly lan- 
guage instructions and the names of 60 
memory functions, then you'll apply 
these concepts to your knowledge of 
BASIC to improve your programming 
speed up to 1,000 times. 
(0 471 09293-2) April 1982 
288 pp. $9.95 
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Color Computer program 



The Color Computer 
as a planetarium 

Color Computer with 16K extended BASIC, cassette or disk 

T. R. j!)ettmarih, Associate editor 



This illustration is a screen dump of the display generated with this program 
using a start date of 01,01,82 (January 1, 1982), an increment of 365 days', and 
a display of nine planets. * •<< 



One of the fun things about 
working with the Color Computer is 
the graphics. Actually, they are 
quite easy to use. 

In the way of simple introduction, 
we have included a program (in 
keeping with the theme of space 
articles) that displays the planets on 
your Color Computer. 

The program will display 
successive positions of the planets 
at whatever interval you set. You 
can display any number of planets 
from one through nine. You will find 
though, that when you display all 
the planets, you can't tell one inner 
planet from another, since they all 
begin to wash out. 

The program is written 
completely in BASIC. It illustrates a 
number of graphics functions: 
LINE, CIRCLE, DRAW, PCLS, 
SCREEN and PMODE. 

Try typing the program into your 
computer and running it. It makes 
an interesting display including a 
running date displayed on the 
screen. (Look at lines 1040 to 1280 to 
see how it is done.) 

To explain the program, let's look 
at the basic structure. After 
completing some necessary 
initialization (lines 10 — 270), the 
program goes to the subroutine at 
line 850 to display the desired 
planets. 



Interesting routines 

Interesting graphics routines are 
located at the following lines: 
540 — displays a planet. 
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790 — sets up for graphics screen. 

850 — master graphics display 

routine. 

1040 — data for numeral draw 

commands. 

1140 — displays date on screen. 

It should be made clear that this 
program isn't an attempt to provide 
state of the art graphics. It is an 
attempt to show an interesting 
application. 

The astronomy 

There is no doubt that at least , 
some of you are wondering how the 
program computes the position of 
the planets. Basically, the technique 
involves solving an equation (called 
Kepler's equation) and then 
plugging some numbers in a few 
standard formulae. 

The subroutine at line 300 solves 
Kepler's equation by guessing a 
solution, and then using it to 
compute a better solution. This 
continues until new solutions are 
roughly the same as old solutions. 

We have to do this because 
Kepler's equation can't be solved 
like you would an algebra problem. 
If you are really interested in the 
math, look at some of the more 
technical references listed at the end 
of this article. Otherwise, you can 
just forget there is any math 
involved and make believe there is 
some kind of black box which gets 
the planets' coordinates. 

If you are really interested in the 
Astronomy, look at lines 60 to 140, 
which give the orbital elements for 
the planets. These are explained in 



any good book on Celestial 
Mechanics. If you have better 
numbers, by all means try them. 
The numbers used here are about 12 
years old and of fairly low accuracy. 
They were chosen to have enough 
accuracy for the graphics display. 

Only a few celestial phenomena 
were checked against the display — 
mostly relations between planets in 
the inner solar system. It would be 
interesting to hear about any more 
detailed checks that anyone is able 
to do. 

The techniques used here are 
applicable for more than just the 
solar system. Other celestial bodies, 
such as the moons of Jupiter, 
Earth's moon, and even satellites 
around the earth obey these 
equations. 

References 
G. D. Roth, Astronomy — A 
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Celestial Mechanics, Academic 
Press, New York, 1970 
K. R. Lang, Astrophysical 
Formulae, Springer — Verlag, New 
York, 1974 

A. E Roy, Orbital Motion, John 
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Royal Astronomical Society of 
Canada, 1980 



After you type and run this program 
there will be several prompts to 
reply to. The first will be for a date. 
You should enter a starting date 
that you wish the computer to use 
for the display of the initial planet 
locations. The next prompt will be 
for a calendar date increment. This 
number will tell the computer to 
display the planets according to the 
increment chosen. For example, if 
you enter 30 for the increment 
prompt, the computer will display 



the planets' positions every 30 days 
starting with the date entered for 
the first prompt. The last prompt 
will be for the number of planets you 
wish displayed. As explained in this 
article, you may enter up to nine 
planets, but those closest to the sun 
will be more closely grouped and the 
graphics clarity will suffer. 

When all prompts have been 
answered, the computer will draw 
the planets in their relative 
360 GOSUB410 



Color Computer program 

positions with respect to the sun. 
The sun is indicated by the cross in 
the center of the screen. The planet 
closest to the sun will always be 
Mercury, the next Venus, then 
Earth, Mars, etc., according to how 
many planets you requested the 
computer to display. 

The planets, in order from the sun, 
are: Mercury, Venus, Earth, Mars, 
Jupiter, Saturn, Uranus, Neptune 
and Pluto. — Ed. 



10 REM 80US PLANETARIUM 

20 CLEAR100:PCLEAR4 

30 CLS:PRINT"80-US PLANETARIUM" 

40 DIM PL(9,6),MD(12),SC(9),SZ(9),NM$(9 

),XY(9,2) 

50 P0RI=1T09 : F0RJ=1T06 : READPL( I , J) :NEXT 

J:NEXTI 

60 DATA 40945,4.0923,-2056,47.146,75.89 

83,7.0042 

70 DATA 40727,1.6021, .0068,75.780,130.1 

639,3.3944 

80 DATA 40587, .98561, .0167,0,101.220,0 

90 DATA 40515, .52403, .0934,48.786,334.2 

183,1.85 

100 DATA 38398, .08309, .04845,99.442,12. 

7167,1.305 

110 DATA 31341, .0335, .05565,112.789,91. 

0833,2.489 

120 DATA 39265,-01173, .04724,73.39,169. 

05, .7731 

130 DATA 6499, .005981, .00858,130.68,43. 

8667,1.773 

140 DATA -42756, .003979, .250,109.73,224 

,17.17 

150 INPUT"DATE MM,DD,YY";MM,DD,YY 

160 INPUT"DAY INCREMENT" ;DI 

170 INPUT"NUMBER OF PLANETS (1-9)"; MP 

180 FORI=lT012:READMD(l):NEXTI 

190 GOSUB350:YR=1900+YY+DN/365 

200 DATA0, 31, 59, 90, 120, 151, 181, 212, 243, 

273,304,334 

210 JD=15020:DR=3. 14159/180 

220 F0RI=1T09:READSC(I):NEXTI 

230 DATA .6,1.2,1.8,2.5,6,16,35,50,50 

240 SOSC(MP) 

250 P0RI=1T09:READSZ(I):NEXTI 

260 DATA 3,3,3,3,5,4,3,3,3 

270 PORI=0TO9:READNM$(I):NEXTI 

280 GOSUB850 

290 END 

300 REM KEPLER'S EQN 

310 M=DR*MU*(T-T0):ACC=.001:E=M 

320 E1=M+EC*SIN(E) 

330 IF ABS(E1-E)<ACC THEN RETURN 

340 E=E1:GOTO320 

350 REM JULIAN DAY 



370 T=JD+INT(365.25*YY)+DN 

380 RETURN 

390 REM DELAY LOOP 

400 FORTM=LTO500:NEXJ7IM: RETURN 

410 REM DAY NUMBER IN YEAR 

420 DN=MD(MM)+DD 

430 IF MM<3 THEN RETURN 

440 IF INT(YY/4)*4=YY THEN RETURN 

450 IF INT(YY/400)*400=YY THEN470 

460 IF INT(YY/100)*100=YY THEN RETURN 

470 DN=DN+1 

480 RETURN 

490 REM SOLVE FOR PLANET COORDS 

500 GOSUB300 

510 GOSUB690 

520 GOSUB750 

530 RETURN 

540 REM DISPLAY PLANET 

550 XX=127+127*(X/SC) 

560 YY=191- ( 95+95* (Y/SC) ) 

570 IF XX<0 OR YY<0 THEN RETURN 

580 IF XX>251 OR YY>191 THEN RETURN 

590 IF XY(I,1)<>0 THEN GOSUB650 

600 XY(l,l)=XX:XY(l,2)=YY 

610 CR=SZ(I) 

620 CIRCLE(XX,YY),CR,1,1 

630 PAINT (XX, YY), 1,1 

640 RETURN 

650 REM BLANK OLD PLANET 

660 CIRCLE(XY(I,1),XY(I,2)),SZ(I),0:PAI 

NT(XY(I,1),XY(I,2)),0,0 

670 CIRCLE(XY(I,1),XY(I,2)),1,1:LINE(XY 

(I,1),XY(I,2))-(XX,YY),PSET 

680 GOSUB810: RETURN 

690 REM RADIUS & ANOMALY 

700 A=( (3548.19/3600)/ (MU)T( .667) 

710 X=A* (COS(E) -EC) : Y=A*SQR( 1-EC*2 ) *SIN 

(E) 

720 V=ATN(Y/X) 

730 R=X/COS(V) 

740 RETURN 

750 REM XY COORD 

760 X=R*(COS(OM)*COS(V+WM)-SIN(OM)*SIN( 

V+WM)*COS(IN)) 

770 Y=R* (SIN(OM) *COS(V-WM)+COS(OM) *SIN( 

V+WM)*C0S(IN)) 
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PROGRAMMING TOOLS 
FOR YOUR TRS-80® 



INSTANT ASSEMBLER 
NOW ON DISK! 

The INSTANT ASSEMBLER is a powerful disk or tape-based assembler and debugger 
for the TRS-80. Now you can assemble directly to memory and immediately debug your 
program with the built in single stepping debugger. Quickly switch from assembler to 
debugger and back again without losing the source code. This feature makes INSTANT 
ASSEMBLER an excellent learning tool for assembly language programming. 
INSTANT ASSEMBLER is absolutely unique among tape based assemblers in that it 
produces relocatable code modules that can be linked with the separate LINKING 
LOADER, which is supplied in two versions for loading programs into either high or low 
RAM. This lets you build long programs with small modules. INSTANT ASSEMBLER also 
features immediate detection of errors as the source code is entered, a compactly coded 
source format that uses 1/3 as much memory as standard source, and many operational 
features including single stroke entry of DEFB and DEFW, pinpoint control of listings, 
alphabetic listing of symbol table, separate commands for listing error lines or the symbol 
table, block move function, and verification of source tapes. 

INSTANT ASSEMBLER'S debugger provides single stepping with full register displays, 
decimal or hex entry of addresses, forward or backward memory displays, disassembly 
of object code in memory, memory display in ASCII format, and hex-to-decimal or 
decimal-to-hex conversion. The single- stepper will step one instruction at a time or at a 
fast rate to any defined address. 

INSTANT ASSEMBLER occupies less than 8400 bytes of memory. In a 1 6K machine this 
will leave you enough memory to write assembly language programs of around 2000 
bytes. This and its module-linking feature make INSTANT ASSEMBLER ideal for users 
with only 16K machines. The instruction manual may be purchased separately for $3, 
which will apply towards the purchase of the INSTANT ASSEMBLER. In addition to disk 
I/O, the disk version includes a stand-alone version of the debugger. 

Specify Model I or Model III. TAPE INTASM $29.95 

Specify Model I or Model III. DISK INTASM $35.95 

RESTORE DAMAGED TAPES WITH RESQ2 

Cassette recordings are subject to several types of damage. Thin spots in the oxide, dirt, 
voltage fluctuations while recording, or stray magnetic fields can all contribute to lost or 
added bits. RESQ2 was written to provide a method of restoring tapes that can no longer 
be loaded for these reasons. It can restore BASIC, SYSTEM, ASSEMBLER, and DATA 
tapes. RES02 compares two copies of the damaged tape to attempt a restoration, 
though restoration can often be accomplished with only one copy. After the damaged 
data is corrected in memory, a new tape may be recorded and verified which does not 
contain the errors. The success rate of RESQ2 will depend on the severity and quantity of 
errors. RESQ2 comes with a comprehensive user manual and examples of two types of 
'crashed' programs to practice on. 
Specify Model I or Model III. RESQ2 $19.95 

SINGLE STEP THROUGH RAM OR ROM 

STEP80 allows you to step through any machine language program one instruction at a 
time, and see the address, hexadecimal value, Zilog mnemonic, register contents, and 
step count for each instruction. The top 14 lines of the video screen are left unaltered so 
that the "target program" may perform its display functions unobstructed. STEP80 will 
follow program flow right into the ROMs, and is an invaluable aid in learning how the ROM 
routines function. Commands include step (trace), disassemble, run in step mode at 
variable step rate, display or alter memory or CPU registers, jump to memory location, 
execute a CALL, set breakpoints in RAM or ROM, write SYSTEM tapes, and relocate to 
any page in RAM. The display may also be routed to your line printer through the device 
control block so custom print drivers are automatically supported. 
Specify Model I or Model III. STEP80..... $16.95 

RAM SPOOLER AND PRINT FORMATTER 

This program is a full feature print formatting package featuring user defineable line and 
page length (with line feeds inserted between words or after punctuation), screen dump, 
printer pause control, and baud rate selection. In addition, printing is done from a 4K 
expandable buffer area so that the LPRINTor LLIST command returns control to the user 
while printing is being done. Works with cassette or disk systems. Ideal for Selectric or 
other slow printers. Allows printing and processing to run concurrently. Output may be 
directed to either the parallel port, serial port, or the video screen. 80 Microcomputing 
said "I can only give my highest recommendation of Spooler and Mumford Micro 
Systems." 
Specify Model I or Model III. SPOOLER $16.95 

DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies of almost any tape including Basic, SYSTEM, data lists, assem- 
bler source, or "custom loaders". The file name, load address, entry point, and every byte 
(in ASCII format) are displayed on the video screen. Model III version allows changing 
tape speed so you can load in a tape at 500 baud and write it out at 1500. 
Specify Model I or Model III. CLONE $16.95 



ORDERING: Complete satisfaction is guaranteed or a full refund will 
he made All programs (except Tfil.COM) are shipped on cassette 
unless $5 is included for a formatted (no system) disk Include $1.50 
for postage and handling California residents add b°/o sales tax Visa. 
Masteroharye and COl) orders accepted SPECIFY MODEL I OR 
MODEL 111. Dealer inquiries invited 

MUMFORD MICRO SYSTEMS 

Box 400-D Summerland, California 93067 (805) 969-4557 
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Color Computer program 



780 RETURN 

790 REM SETUP FOR GRAPHICS 

800 PMODE4,l:PCLS:SCREENl,l 

810 REM CENTER MARK 

820 LINE(127,90)-(127,102),PSET 

830 LINE(121,96)-(133,96),PSET 

840 RETURN 

850 REM DISPLAY 

860 IF CD<>0 THEN MP=CD:SG=SC(MP) 

870 GOSUB790 

880 GOSUB1140 

890 FORI=lTOMP 

900 T0=PL(I,1):MU=PL(I,2) 

910 EC=PL(I,3):0M=PL(I,4)*DR 

920 WM=PL(I,5)*DR:IN=PL(I,6)*DR 

930 GOSUB490 

940 GOSUB540 

950 C$=INKEY§:IF C$<>"" THEN IF ASC(C$) 

=13 THEN 1000 ELSE IF ASC(C$)=12 THEN G 

OSUB790 

960 NEXTI 

970 YR=YR+Dl/365:GOSUB1140 

980 T=T+DI 

990 GGTO890 

1000 REM END DISPLAY 

1010 CLS: RETURN 

1020 REM END 

1030 END 

1040 DATA"R5;D7;L5;U7" 

1050 DATA"BM+3,0;D7" 

1060 DATA"R5;D3;L5;D4;R5" 

1070 DATA"R5 ; D4; L2 ; R2 ; D3 ; L5 " 

1080 DATA"BM+4,0;N;G4;D4;N;R1;N;D3;L4" 

1090 DATA"R5;L5;D3;R5;D4;L5" 

1100 DATA"D7;R5;U4;L5" 

1110 DATA"R5;D7" 

1120 DATA"R5;D7;L5;U7;D3;R5" 

1130 DATA"R5;D7;U4;L5;U3" 

1140 REM DISPLAY DATE 

1150 LINE(185,175)-(255,191), PRESET, BF 

1160 MM=INT( 12* (YR-INT(YR) ) )+l 

1170 MM$=RIGHT$ ( "00"4MID$ (STR$ (MM) ,2 ) , 2 

) 

1180 FORK=lTOLEN(MM$ ) : C=VAL(MID$ (MM$ ,K, 

D) 

1190 X1=195+(K-2)*8:Y1=180 

1200 D$="BM"+STR$ (XI )+" , "+STR$ (Yl ) -WM$ ( 

C):DRAWD$:NEXTK 

1210 YR$=MID$(STR$(INT(YR)),2) 

1220 FORK=lTOLEN(YR$) 

1230 C=VAL(MID$(YR$,K,1)) 

1240 X1=219+(K-2)*8:Y1=180 

1250 D$="BM"+STR$ (Xl)+", "+STR$ (Y1)+NM$ ( 

C) 

1260 DRAW D$ 

1270 NEXTK 

1280 RETURN 



"Well done, highly readable, easy to use. The book is 
a delightful adventure." —George Blank, Editorial 
Director, Creative Computing ~~ 
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• The /irst book o/ its kind.' 



• Just $19.95 (+2.05 s/h) 



Have an 
adventure! 



• Contains a unique 
adventure generator! 

• Famous adventures by 
famous authors (see table of 
contents, above). 

• Sec it at your /oca/ dealer, 
or order direct from: 

80-Northwest Publishing Inc 

3838 South Warner Street 

Tacoma, Washington 98409 

(206) 475-2219 



Dealer inquiries invited 



copy(s) of the ADVENTURE BOOK for 



Please send 

only $19.95 each, plus $2.05 shipping and handling. 
Check, M.O., VISA/MC# enclosed. COD orders accepted. 



Name. 



Address. 
City 



State. 



Zip. 



VISA/ MAS TERCARDU 



Exp Date 



Signature. 



Send to: 80-Northwest Publishing Inc. 3838 South 
Warner Street, Tacoma, Washington 98409 
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Hardware evaluation. 



TRS-80 Model I 
work-alike 

An evaluation of the LNW-80 microcomputer 

Frank Fischer and Eric Hilberg, Everett, WA 



The Model T car and the TRS-80 
Model I computer share one 
important concept. They were both 
developed as a simple, straightfor- 
ward design with a minimum 
amount of frills and priced to appeal 
to the lower end of the market. Both 
enjoyed tremendous sales, but as the 
newness gave way under everyday 
use, limitations placed by the simple 
design began to make themselves 
apparent. 

In the case of the TRS-80, these 
limitations showed themselves in 
slow processor speed, poor video 
resolution and no color capability. 
Other computers, with all of these 
features plus a higher price, soon 
appeared on the market. With 
sizeable investments in software 
and peripheral devices, many 
owners were reluctant to start all 
over again. 

A middle-of-the-road solution in 
the form of the LNW-80 computer 
has now been on the market for over 
a year. Designed by LNW Research, 
of Costa Mesa, California (the same 
people who brought out the excellent 
expansion interface for use with the 
TRS-80 Model I), the computer 
might be considered the equal of a 
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second generation TRS-80 Model I. 
Using a Z80-A processor capable of 
running at either 1.77 Mhz or 4 Mhz, 
it has all TRS-80 Model capabilities, 
plus high resolution black and white 
graphics (480 x 192), composite 
video color (128 x 192), Red-Green- 
Blue color (384 x 192), reverse video 
and upper-lower character set. 

The LNW-80 computer can be 
obtained in various forms, from the 
bare circuit board and manual for 
$89.95, to the completed unit for 
$1450. The computer is designed in 
such a manner that the keyboard, 
Level 2 read-only-memory set and 
monitor from a TRS-80 Model I can 
be used. If you don't have these 
items, you can order them from 
LNW, as well as selected integrated 
circuits, power transformer and the 
case. 

While the parts packing density is 
high, over 100 integrated circuit 
chips as well as on-board filtering 
and power regulation (all on a 10 x 
16 inch circuit board), the layout 
appears to follow good engineering 
principles. The quality of the 
printed circuit traces as well as the 
solder mask and thru-hole plating is 



excellent. Mounting holes, edge 
connector and extra power supply 
capacity are provided to facilitate 
the addition of the expansion 
interface board with a minimum 
amount of fuss. 

Assembly of the computer board 
is straightforward. Sockets for the 
integrated circuits (recommended 
by LNW as the traces and pads are 
small and therefore subject to 
damage by repeated soldering) are 
usually installed first, followed by 
the resistors, capacitors and other 
remaining parts. When all of the 
soldering is done, the rosin residue 
should be cleaned off and all solder 
joints given a careful examination. 
This is also a good time to verify the 
polarity of the diodes and 
capacitors. 

Checking out the board begins 
with the power supply. Once this 
section is working properly, the 
jumpers, to bring power to the main 
part of the board, can be installed as 
well as the integrated circuits 
needed for the portion to be tested. 
The firmware used can be the Radio 
Shack Level II, two or three read- 
only-memory set, or the LNW six 
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read-only-memory set with PI 
optioned to match the particular set 
used. With keyboard and monitor 
hooked up, application of power 
should show "MEMORY SIZE?" on 
the screen — if Mr. Murphy has not 
hexed you. 

With the experience of five units to 
draw upon, performance has been 
the following: One unit powered up 
with no problems, three had 
problems in the area of wrong parts 
installed, faulty parts or bent 
integrated circuit pins, and one unit 
had a problem that required a call to 
LNW (they give excellent technical 
support). Black and white low 
resolution is standard TRS-80; the 
high resolution is very sharp. The 
composite video color, using a direct 
link to the monitor, works well but 
the radio frequency modulator, the 
color picture is rather marginal. The 
colors are not sharp and have 
"snow" in the background. One user 
installed an external radio 
frequency modulator which gave a 
little better picture. No one we know 
of has attempted to use the high 
resolution Red-Green-Blue color yet. 

Although the documentation 
provided by LNW is brief, it is 
adequate. It can be augmented by 
the TRS-80 Level II technical 
manuals. While the schematics in 
the technical manual are different, 
the description of the logical 
operation of the various circuits is 
helpful. 

The methods used (influenced in 
part by the skill and financial 
resources of the builder) in the 
construction of the computers were 
varied. In one case, a defunct 980 
Adds terminal was cannibalized for 
its case, keyboard, monitor and 
power supply. Two persons chose to 
build their own cases. Small part 
procurement ranged from junk box 
to Digi-Key and JameCo. One unit 
was built from parts supplied 
almost entirely by LNW. 

Building the LNW-80 computer 
has been a rewarding project, 
financially as well as emotionally. 
For a few hundred dollars, we have a 
system that is competitive with 
commercially-built systems costing 
over 2 thousand dollars. The pride 
associated with the statement, "I 
built it myself, does wonderful 
things for one's ego. ■ 




Photo 1 . A closeup view of photo 2, below. The case is that supplied by LNW 
Research Corporation. Photography by the authors. 




Photo 2. 



Photo 3. The LNW microcomputer in one of the author's homemade sheetmetal 
cases. 
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System upgrade. 



Add disk and 
memory to Model III 

Do it yourself and save $$$ 



Model III 



Sal Navarro, East Rutherford, NJ 



This article will tell you how to 
save approximately $600 when 
upgrading your Model III 16K 
computer to a 48K Model III with 
two disk drives. The task is 
accomplished in one hour with the 
use of an excellent set of 
instructions, a phillips screwdriver, 
a standard screwdriver and a pair of 
cutters. 

After checking out the specifica- 
tions of the different upgrade kits on 
the market, I chose the one 
advertised by B. T. Enterprises. 
This kit comes with a switching 
power supply manufactured by the 
same company that supplies the one 
in the Model III from Radio Shack. 
The only difference in this power 
supply is that it has a dual (120 
volt/220 volt) voltage transformer 
on board. The quality of the disk 
controller board is equal to, or better 
than, that of Radio Shack's. The 
drive supports are made of high 
quality metal and the drives I 
purchased are Tandon. The memory 
chips are NEC, with 150 nanosecond 
switching time. 

The kit arrives 

I ordered my 48K memory kit and 
disk controller with two drives from 
B. T. Enterprises, 171 Hawkins 
Road, Centereach, New York 11720 
(516) 588-5836, for $849.95. By 
comparison, Radio Shack's kit was 
$1446.00 plus installation. The kit 
and instructions arrived in first 
class condition. 

Upon reading the instructions, I 
found that they were geared to the 
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novice. Anyone could install these 
parts with no problem that I could 
perceive. The disk controller comes 
from Micro Mainframes. 

One thing I noted was that the 
edge connectors are gold plated. 
Anyone having previously owned a 
Model I will testify to having to 
"Pink Pearl" (use an eraser) a lot 
because of connections not being 
gold plated. Needless to say, I was 
impressed with what I saw, and was 
anxious to get everything installed. 

Installing 48K of memory 

If you have 48K already, you can 
skip this section. If not, let's put in 
some memory. 

The first thing you must do is to 
remove the AC power cord, then pick 
out a hard, flat surface to work on. I 
choose my desk because it is in a 
room without a carpet. Remember 
Murphy's Law about static charges 
and integrated circuits. Make sure 
your machine has been throughly 
checked out. 

Now, lay down something soft on 
the work area as not to scratch the 
computer. Place the computer on the 
cloth, laying on its back. You will 
see nine screw holes. Remove the 
screws and remember which length 
screw came from where. 

Now for the Forth Worth shudder: 
On the lower left corner is a label 
which, when broken, will void your 
90-day warranty. Rub your finger 
over the label and feel for another 
screw hole. Push the screwdriver 
through and remove screw number 



10. Turn the computer right side up 
and remove the screw in the top 
center area. 

You are ready to remove the top 
cover and video tube. Remember 
when lifting the cover, that the end 

of the video tube comes very close to 
the rear circuit board. If you try to 
force anything, it will probably be 
damaged. Grab the cover and lift up 
and toward the left so that you can 
see under the case if anything starts 
to grab. Do not pull or tug because 
there will be two cables connected 
inside the cover after it is lifted off of 
the machine. 

Lay the cover down on the left side 
and remove the two video 
connectors. Place the cover, with the 
video tube, where it cannot be 
damaged. Turn the unit around so 
that you are facing the rear of it. 
Remove the two screws on top of 
either side of the circuit cage. At the 
bottom, peel back the tape holding 
the foil to the bottom of the cage. Lift 
upward and outward on the top of 
the cage. Do the same on the sides, 
then lift off the cage cover. You can 
see now what you paid all of that 
money for. 

In the top right corner of the 
circuit board, you will see three rows 
of chip sockets. The top row should 
be full with the original 16K you 
purchased. The second and third 
rows of sockets are where you will 
place the next 16K or 32K that you 
are going to install. If you have any 
doubts about Murphy and the static 
charge, ground yourself so as to 



MODEL III DISK UPGRADE I ! 
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FEATURES: 

• Switching Power Supply (Runs cooler) 

• 40/80 Track supported 

• Single/Dual Head supported 

• Metal disk drive brackets 

• All hardware and cables for 2 disk drive 

• 1 Hour or less for installation. 



Kit alone $279.95 

Kit with 2/Tandon 100-1 40 track disk drives 
[Same as R/S) and 32K 150ns (FAST) RAM 
Memory $849.95 



DosPlus 3.4 III Operation System $99.95 

NewDos/80 Ver 2.0 III Oper Sys . $99.95 



Regularly 149.95 - This price 
rchase only. 1 per order!! 



with Kit 



purchase only. 1 per 




Put disk drive into your TRS-80 Model III. Easy to install and lower in cost than other kits. 
Compare our features with others and the choice is clear. 




171 Hawkins Rd. 
Centereach, N.Y.1 1720 
516) 981-8568 (voice) 
516 588-5836 (modem) 



Dealer Inquiries Welcome 
N.Y.S. Residents Add Tax 
Add $2 shipping - handling 
Prices subject to change 



WELCOME 




PRINTER STAND 



End the paper mess from your desk-top printer. Paper is fed from 
under the printer to allow easy stacking behind the printer of the 
printer output. Extra Shelf (SHOWN ABOVE) is available for easy 
forms change. Large Stand is available with slot cut for bottom feed 
printers (Anadex, etc). Available without shelf only. 



Regular (300010) 

Regular w/shelf (300011) 

Large 300020 

Large w/shelf (300021 

Large w/slot (300050) 



$29.95 
$44.95 
$34.95 
$49.95 
$49.95 



EPSON RIBBON RELOADS 

Reload your MX 70/80/100 cartridges with new Black, Red, or Blue 
ribbon. Just load these silver dollar loops into your old cartridge and 
save! Buy 12 and save even more! Complete instructions. 
Black . . (500000) . . . $3.95 ea. Black . (500001) . . . $39.50 dz. 
Red ... . 500010 . . . $4.95 ea. Red . . . 500011 . . . $49.95 dz. 
Blue. . . . (500020) . . . $4.95 ea. Blue. . . 500021 . . . $49.95 dz. 



MX 70/80 CARTRIDGES 

MX 70/80 Ribbon Cartridge 
MX 70/80 Ribbon Cartridge 
MX 70/80 Ribbon Cartridge 
MX 70/80 Ribbon Cartridge 
MX 70/80 Ribbon Cartridge 
MX 70/80 Ribbon Cartridge 



Black (500050) :... $10.95 ea. 

Red . 500060 $11.95 ea. 

Blue. 500070 $11:95 ea. 

Black 500051 . . . 3 pack$29.95 pk. 
Red . 500061 . . . 3 pack$31.95 pk. 
Blue. 500071 ...3 pack$31.95pk. 



DISKETTES 

Elephant Memories Systems Diskettes at a special LOW price ! ! ! 

Single Density/Single Sided /Soft Sector 500351 $22.50 

Double Density/Single Sided/Soft Sector 500352 $26.50 

Double Density/Double Sided/Soft Sector .... 500353 $32.50 



PORTABLE DISK BULK ERASER 

Clean all old data off of your diskettes before reusing them! This is a 
MUST for vour comDuter room. Easv to use. non-electric, portable ! • ! 
500102 Only. ..$4.95 



Circle # 1 
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System upgrade. 




Photo 1 . The disk controller being put into place. Photographs in this 
article are by the author. 



dissipate any charge you may have 
built up. 

Be sure to insert the chips 
correctly. The notch is pointed up as 
the chip is installed in the socket. If 
you are only adding 16K at this 
time, make sure that they all go into 
the second row. If you already have 
32K and are expanding to 48K, the 
chips will go into the third row. 

Reverse the disassembly 
procedure, being sure to reinstall the 
two video connector cables to put the 
machine back together. After you 
are through with the reassembly, 
turn on the machine and press the 
ENTER key twice to get past CASS? 
and MEM SIZE. Now type "PRINT 
MEM". For a 32K machine, it 
should answer 31698 and a 48K 
machine should answer with 48082. 

Now put back all the screws in the 
bottom and the one in the back. If 
you are going to install the disk 
modification now, you should have 
stopped after installing the chips. 




Photo 2. Main board removed and with 48K of RAM installed. 



Installing the disk kit 

Remove the main board and place 
it where it will not be damaged. 
Mount the disk controller board on 
the left side of the chasses on the 
metal standoffs using the 6/32 
screws provided with the kit. Take 
the four-inch long ribbon cable and 
insert it into the connector at the top 
of the board. Replace the main 
board, taking care not to drop any of 
the rear insulators. Put back all the 
cables you removed before. You can 
double check yourself with the 
diagrams in the instruction sheets. 

Turn your computer around and 
install the drive mount brackets in 
their noted positions using the 
supplied hardware and screws. 
Before I installed my drives, I 
installed the power supply 
connectors into the drives. This is a 
lot easier with the drives in front of 
you. 

Place drive zero in the lowest 
position and secure it to the 
brackets. Install drive one in the 
upper position and secure it. Take 
the power supply and peel off the 
covering on the double-sided tape 
and secure it to the floor of the 
cabinet. Take the power supply 
cables from both drives and connect 
them to the power supply on 
positions SK2 and SK3. Locate the 
small white connector in the Tandy 
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cable harness and connect it to SKI 
on the power supply board. Connect 
the free end of the 20-pin ribbon 
cable on the disk controller board to 
J7 (small white connector on the top 
left) of the main computer board. 
Make extra sure that both ends are 
tightly secured. 

Connect the remaining 10-inch 
long flat ribbon cable from the small 
black connector just above the Z-80 
to the one just like it below the white 
connector in the center of the board. 
Connect the drive cable to the drives 
with the red stripe of the cable to the 
left side of the drives. Double-check 
all of your connections, making sure 
that you haven't missed anything. 
Be certain, or Murphy will let you 
know. 

Almost finished 

Now you have to remove the 
plastic disk drive dummy doors 
from the video cabinet. Take a pair 
of cutting pliers and snip the edges 
around the inner ring of the inserts. 
Be careful not to rush and take large 
cuts. Just snip each of the joints and 
it will fall out. 




Photo 3. Shows power supply, disk drive brackets and drives installed. 



Now you have drives 

Place the cover next to the 
computer base and reconnect the 
video plugs. Gently and carefully 
place the cover back on the 
computer, being careful with the 
rear of the tube. Power up the 
computer and it will respond with 
"Diskette?". Now take your 
operating system and insert it into 
the bottom drive and press the 
RESET button. It should sign on 
and be ready to run. If not, recheck 
all of the steps you have done. 

There is a "When things go 
wrong" list included with the 
instruction sheets which lists most 
of the problems that have occured in 
the past. The only problem that I 
ran into was that the power supply 
cable to drive zero had a loose wire 
in it. Beyond that, it went together 
in under one hour. 

The instructions are simple to 
follow and easy to read. I have used 
this system for two months now, 
and it has not missed a bit. If you are 
planning to upgrade your system to 
disks, I highly recommend the 
Micro Mainframes disk controller 
and power supply from B. T. 
Enterprises ■ 




Photo 4. Shows the Model III with 48K and two drives being run with 
LDOS. 
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Solving simultaneous 
linear equations 



Matrix manipulation 



Model I, II and III 



J. C. Adams, Jr., Ph.D., Tullahoma, TN 



The solution of sets of simultaneous linear algebraic 
equations consumes , a significant fraction of the 
computer time at virtually all general purpose computer 
service centers. The solution of such sets arises in a wide 
variety of problems, including the numerical solution of 
ordinary and partial differential equations, structural 
analysis, network analysis, optimization, data 
analysis, and curve fitting. Sets composed of large 
numbers of equations are commonly encountered, and 
the choice of a suitable technique for a given problem 
which is both accurate and efficient is of prime concern. 
This article will present one such method applicable for 
solution of sets of simultaneous linear algebraic 
equations using the Radio Shack TRS-80 Model I 
microcomputer system with Level II BASIC. 

BASIC Matrix Terminology 

A matrix is defined in this context as a rectangular 
array of numbers, with its size characterized by the 
number of rows and columns in the array. Thus: 
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Dr. Adams is Director of the Computer Service Center 
for Sverdrup Technology, Inc., an advanced technology 
company which offers engineering and consulting 
services. He has over 15 years of experience in 
performance and management of large-scale digital 
computer simulations involving scientific/engineering 
phenomena, including computational fluid dynamic 
studies using the CRA Y-l supercomputer. 



is a five (row) by eight (column) matrix. Any given 
element of the matrix A will be denoted by A(I,J), where 
I is the row location and J is the column location. Thus, 
A(3,4) = 5. Our concern for this article will be with 
square matrices (number of rows = number of columns) 
and column vectors of the form: 



B 



which is denoted as B( J), where J is the column location. 
Thus, B(3) = 5. 

Consider a set of simultaneous linear algebraic 
equations (we arbitrarily choose three equations in 
three unknowns for illustrative purposes). This set can 
be written as: 



A(l,l) X(l) 
A(2,l) X(l) 
A(3,l) X(l) 



A(l,2) X(2) 
A(2,2) X(2)' 
A(3,2) X(2) 



A(l,3) 
A(2,3) 
A(3,3) 



X(3) = B(l) 
X(3) = B(2) 
X(3) = B(3) 



An equivalent representation in matrix form is: 



A(l,l) A(l,2) A(l,3) 
A(2,l) A(2,2) A(2,3) 
A(3,l) A(3,2) A(3,3) 



or, A X = B, where A is the square matrix of coefficients, 
X is the column vector of unknowns, and B is the column 





X(l) 




B(l) 




X(2) 


= 


B(2) 




[_X(3)J 




LB(3)J 
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MORE BYTES 
FOR YOUR BUCKS 

CP/M Compatibility Plus 64K RAM 
for your TRS-80 

Freedom Technology 
International 



PRESENTS 




CP/M Compatibility for your 
TRS-80 model I and ill, PMC 80 
and 81, and LNW 80 systems. 



CP/M Compatibility Plus 
64K RAM for your TRS-80 
model I and III. 



TWO SYSTEMS IN ONE 
Run CP/M application 
programs in addition to 
TRS-DOS 

INDUSTRY STANDARD 
Enter the world of powerful 
CP/M application programs; 
Wordstar, dBase II, etc. 
OPEN AND SHUT CASE 
EASY to install, plug-in 
boards; no wires or traces to 
cut; no soldering. 
TECHNICAL BACKGROUND 
over 50 years of high 
technology experience... from 
Maxi's to Micro's. ..both 
Hardware and Software. 



FREEDOM OF CHOICE 
T8/OS (Our powerful Z-80 
code operating system) and 
CP/M 2.2 if you choose. 

• Dealer Inquiries Invited 

• Six Month Warranty 

• 30 Day Money back 
Guarantee 

Freedom Option . . . .$275.00 

Freedom Plus .$490.00 

Manual Only $ 25.00 

Call us for Information about 
our large selection of CP/M 
application programs. 



To order Call Toll Free 
1.800.5234067 
In Pennsylvania call 
(215) 569-2381 



TRS-80 is a registered trademark of 

Tandy Corp. 
LNW-80 is a registered trademark of 

LNW Research Inc. 
PMC 80,8? is a registered trademark of 

Personal Microcomputer Inc. 
TRS-DOS is a registered trademark of 

Tandy Corp. 
CP/M is a registered trademark of Digital 

Research mc. 
Wordstar is a registered trademark of 

Micro Pro int. Corp. 
dBase II is a registered trademark of 

Ashton-Tate 



Freedom Technology 
International 

119 North 18th Street, Philadelphia, PA 19103 
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vector of the right hand sides. A numerical example in 
matrix format is as follows: 
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X(3) 
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which has the exact solution: 



X = 



or X(l) = 1, X(2) = 2, and X(3) = 3. 

Numerical Solution Algorithm 

One of the most commonly employed direct methods 
for the numerical solution of sets of simultaneous linear 
algebraic equations is the so-called Gaussian 
elimination described in complete detail by most 
numerical analysis textbooks (see Bibliography). One 
computational difficulty can arise with the standard 
Gaussian elimination technique. The pivot element in 
each row is the element on the main diagonal of the 
matrix. Under certain circumstances, the diagonal 
element can become very small in magnitude compared 
to the rest of the elements in the pivot row, as well as 
perhaps being quite inaccurate. For various reasons, 
this can create a very unfavorable situation in terms of 
roundoff error which can result in an inaccurate 
solution vector. 

This type of roundoff error problem can be 
particularly significant with large sets of equations. 
The problem can be effectively treated by interchanging 
rows in the matrix (and in the right hand side) to bring 
the largest element in the column to the pivot position. 
Strategies to maximize pivot elements are sometimes 
called "positioning for size" or "pivoting." 

Almost all large-scale modern computing 
installations performing scientific/engineering 
calculations have "stock" subroutines for solving sets 
of simultaneous linear algebraic equations. These are 
usually based on variants of Gaussian elimination, 
employing pivoting. 

One of the most readily available, best documented, 
efficient, and of proven accuracy, "stock" subroutines, 
is contained in the IBM Scientific Subroutine Package 
(see Bibliography). This subroutine, called SIMQ, is 
written in FORTRAN for use on IBM System 360 
computers. A Level II BASIC version of subroutine 
SIMQ is presented in the associated listing. 

Complete documentation of this subroutine is 
provided via comments by REM statements. Also 
provided is a cross reference listing of all subroutine 
variables, BASIC statements, and BASIC functions by 
line number. It is important to note that the coefficients 
of matrix A must be stored columnwise in vector format 
for use in subroutine SIMQ. 

Application of Subroutine SIMQ 

In order to apply subroutine SIMQ for numerical 
solution of sets of simultaneous linear algebraic 
equations of the form AX=B, a controlling or executive 
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program must be written to input the A-matrix and the 
B-vector as well as to output the X-solution vector. 
Provisions must be included to report the possibility of a 
singular matrix (if matrix A is singular, no unique 
solution exists) as determined by subroutine SIMQ via 
the KS (output digit) variable. 

One fairly general controlling, or executive, program, 
is given in the listing, again written in Level II BASIC. 
Note that all variables beginning with an I through N 
are declared to be integer variables (the DEFINT I-N 
statement). All variables beginning with an A through 
H or O through Z are declared to be double precision 
variables (the DEFDBL A-H, O-Z statement). 

As discussed in the last section, the primary difficulty 
in the numerical solution technique is roundoff error. 
The best defense for this is a large word size (many 
decimal digits), hence double precision arithmetic. 
Further note that the A-matrix and B-vector coefficients 
are input as string variables and converted to double 
precision numerical quantities through the VAL 
function; this is per the discussion on page 4/22 of the 
Second Edition of the Level II BASIC Reference 
Manual. 

The A-matrix is stored columnwise in vector format 
as required for use in subroutine SIMQ. Dimensions for 
both the A-matrix and B-vector are set in line 50 based 
upon the input value N for the number of equations to be 
solved. The solution vector X is returned as the B-vector 
from subroutine SIMQ. If matrix A is singular, 
subroutine SIMQ returns a value of KS equal to unity 
(1), which is acknowledged at line 160 and accompanied 
by a STOP statement. 

Some illustrative problems for solution using 
subroutine SIMQ follow. The reader is urged to work 
these problems using his/her version of subroutine 
SIMQ in order to ascertain that the subroutine has been 
correctly typed from the article listing. Needless to say, 
all comments denoted by REM statements in subroutine 
SIMQ (with the exception of line 10000) could be deleted 
if additional free memory needed to be made available. 
All blank spaces in subroutine SIMQ should also be 
eliminated in a production version where speed of 
execution is a primary factor. 

Example Problem 1 

Solve: 

1.01 X(l) + 0.99 X(2) = 2 

0.99 X(l) + 1.01 X(2) = -2 
which has the exact solution X(l) = 100.0 andX(2) 
= -100.0 with the SIMQ-computed input/output shown 
in the example problem listing. 

Example Problem 2 

Solve: 

0.24 X(l) + 0.36 X(2) + 0.12 X(3) = 0.84 

0.12 X(l) + 0.16 X(2) + 0.24 X(3) = 0.52 

0.15 X(l) + 0.21 X(2) + 0.25 X(3) = 0.64 

which has the exact solution X(l) = -3.0, X(2) = 4.0, and 

X(3) = 1.0 with the SIMQ-computed solution: 

X(l) = -3.00000000000001 

X(2) = 4.000000000000006 

X(3) = 1.000000000000001 




This is a picture 

of all the printers in the world 

that outsell the MX-80. 

Epson. 



The one thing you can't beat in the marketplace is value. 
And there simply isn't a better combination of reliabil- 
ity, print quality, features and price in an 80-column 
printer than the Epson MX-80. Anywhere on earth. 

But while we're pleased to make the best-selling 80- 
column printer in the world, we're hardly surprised. 
Because we decided a long time ago that the way to suc- 
ceed in this business is to build a good product, sell it at 
a fair price, and stand behind it. 

So we built our MX-80 with features like a choice of 
24 different type faces, graphics that rival plotters, logi- 
cal seeking, bidirectional printing and the world's first 
disposable print head. We priced it at under $650. And 
if it breaks, we'll be here to fix it. 

That seems like a straightforward enough policy. But 
when we first introduced the MX-80, the competition 



laughed. Now they're cutting prices, introducing 
"new" models, and running splashy color ads, all in an 
effort to catch up. And they're not laughing. 

But you don't have to take our word for it. You've got a 
choice: you can buy the printer that's been embraced by 

several hundred thousand 
computer fanatics all 
over the world. Or you 
can buy something else. 
And take your chances. 
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Example Problem 3 

Solve: 

4 X(l) + 3 X(2) - 1 X(3) = 6 
7 X(l) - 2 X(2) + 3 X(3) = 9 
5X(1) - 18 X(2) + 13 X(3) = 3 
which has no unique solution, i.e., the A-matrix is 
singular. The present problem was contrived by 
forming the third equation as a linear combination of 
the first two equations. In practice, it is quite common in 
certain physical problems to accidentally form a 
singular set of equations by applying a physical 
principle which is not independent of the other physical 
principles used to construct the set. This singular 
character of the set can sometimes be difficult to detect, 
particularly if the results of the solution happen to be 
physically reasonable. Remember Murphy's Law! 
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Example Problem 1— Input/Output 
Simultaneous Linear Equations 

Input number of equations? 2 

Input A-matrix coefficients and B-vector constants 
Equation 1 

Coefficient 1 => A ( 1 , 1 ) ? 1.01 

Coefficient 2 => A ( 1 , 2 ) ? 0.99 

Constant => B ( 1 ) ? 2<0 
Equation 2 

Coefficient 1 => A ( 2 , 1 ) ? 0.99 

Coefficient 2 => A ( 2 , 2 ) ? 1.01 

Constant => B ( 2 ) ? -2.0 

Solution of simultaneous linear equations in progress 

Numerical solution 

X ( 1 ) = 99.99999999999991 

X ( 2 ) = -99.99999999999991 

End of job 
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Listing 1 
Solving Simultaneous Linear Equations 



10 CLS : PRINT "SIMULTANEOUS 
LINEAR EQUATION 

S" 
20 CLEAR 50 : DEFINT I-N : DEFDBL A-H, 

CHZ 
30 PRINT 
40 INPUT "INPUT NUMBER OF EQUATIONS "; 

N 
50 DIM A(N*N) , B(N) 
60 PRINT : PRINT "INPUT A-MATRIX OOEFFI 

CIENTS AND B-VECTOR CONSTANTS" 
70 FOR I - 1 TO N 
80 PRINT "EQUATION"; I : K ■ I 
90 FOR J»1TON 
100 PRINT " COEFFICIENT"; J; "=> A ("; 

T. " " J. "\ ". . 

INPUT A? : A(K) = VAL(A$) : K = K + 
N 
110 NEXT J 

120 PRINT " CONSTANT -> B ("; I; ") "; 
: INPUT B$ : 
B(I) « VAL(B$) 
130 NEXT I 
140 PRINT : PRINT "SOLUTION OF SIMULTAN 

EOUS LINEAR EQUATIONS IN PROGRESS" 
150 GOSUB 10000 : REM CALL SIMQ( A, B, 

N, KS ) 
160 IF KS «* 1 THEN PRINT : PRINT "***** 
SINGULAR MATRIX- 
*****" : PRINT : STOP 
170 PRINT : PRINT "NUMERICAL SOLUTION" 
180 FOR I ■ 1 TO N 
190 PRINT "X ("; I; ") = "; B(l) 
200 NEXT I 
210 PRINT : PRINT "END OF JO 

B" : PRINT 
220 END 
10000 REM SUBROUTINE SIMQ( A, B, N, KS 

) 
10010 REM FORWARD SOLUTION 
10020 TL«=0:KS=»0:JJ»-N 
10030 FOR J = lTON:JY = J + liJJ 
= JJ + N+1:BA = 0: 
IT » JJ - J 
10040 REM SEARCH FOR MAXIMUM COEFFICIEN 

T IN COLUMN 
10050 FOR I»JTON»U«IT + l 
10060 IF ABS(BA) - ABS(A(IJ)) >« THEN 
NEXT I 

ELSE BA = A(IJ) ; RB = l/BA : IM 
■ I t NEXT X 
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10070 REM TEST FDR PIVOT LESS THAN TOLE 

RANGE (SINGULAR MATRIX) 
10080 IF ABS(BA) - TL > THEN 10100 EL 

SE KS = 1 : RETURN 
10090 REM INTERCHANGE ROWS IF NECESSARY 
AND 

DIVIDE EQUATION BY LEADING CO 

EFFICIENT 
10100 II = J + N*(j-2) : IT = IM - J 
10110 FOR K = J TO N : II = II + N : 12 
= II + IT : SE = A(I1) : A(ll) 

= A(I2) : A(I2) = SE : A(ll) = A(ll)* 

RB : NEXT K 
10120 SE = B(IM) : B(IM) = B(J) : B(J) 

= SE*RB 
10130 REM ELIMINATE NEXT VARIABLE 
10140 IF J » N THEN 10190 ELSE IQ = N*( 

J-l) 
10150 FOR IX = JY TO N : IZ = IQ + IX : 

IT = J - IX 
10160 FOR JX = JY TO N : IA = N*(JX-1) 

+ IX : JC = IA + IT : 

A(IA) = A(IA) - A(IZ)*A(JC) : NEX 

T JX 
10170 B(IX) = B(IX) - B(J)*A(IZ) : NEXT 

IX, J 
10180 REM BACK SOLUTION 
10190 NY = N - 1 : IT = N*N 
10200 FOR J = 1 TO NY : IA = IT - J : I 

B = N - J : IC = N 
10210 FOR K = 1 TO J : B(IB) = B(lB) - 

A(IA)*B(IC) : 

IA = IA - N j IC - IC - 1 : NEXT 
K, J 

10220 RETURN 



Listing 2 

Solving Simultaneous Linear Equations 

Same as subroutine in Listing 1, but fully 

remarked from Line 10000 on. 

10000 REM SUBROUTINE SIMQ( A, B, N, KS 

) 
10010 REM 
10020 REM PURPOSE: 
10030 REM OBTAIN NUMERICAL SOLUTION 

OF A SET OF SIMULTANEOUS 
10040 REM LINEAR ALGEBRAIC EQUATIONS 

OF THE FORM AX = B. 
10050 REM USAGE: 
10060 REM GOSUB 10000 
10070 REM DESCRIPTION OF PARAMETERS: 
10080 REM A = MATRIX OF COEFFICIEN 

TS STORED COLUMNWISE IN 
10090 REM VECTOR FORMAT. THES 

E ARE DESTROYED IN THE 



Computer Program 
Books for Beginners 

Everything you need to know to get started program- 
ming your own computer. These handy books of 
programs, each jam-packed with easy-to- 
understand info for beginners, are crammed with 
hundreds of tips, tricks, secrets, hints, shortcuts, 
techniques, plus hundreds of tested ready-to-run 
programs. For the TRS-80 Color Computer. For the 
TRS-80 Pocket Computer and Sharp PC-1211, 
PC-1500, Casio FX-702P pocket computers, as well 
as for Apple and IBM. 
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ready-to-run software with colorful graphics for TRS-80 Color 
Computer, 128 pages. $9.95 
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sourcebook of useful type-in-and-run software with exciting 
graphics, for TRS-80 Color Computer, 112 pages. $9.95 

The Color Computer Songbook, 40 favorite pop, classical, folk & 
seasonal songs arranged for TRS-80 Color Computer; ready-to- 
run music programs , 96 pages . $7.95 
My Buttons Are Blue and Other Love Poems from the Digital Heart 
of An Electronic Computer, for poetry lovers, computer lovers, a 
high-tech classic, 66 heartwarming poems written by a TRS-80 
Color Computer, 96 pages. $4.95 
Color Computer Coding Form, handy preprinted programming 
worksheets make writing software easy, fun, 40-sheet pad. $2. 95 

Pocket Computer 

101 Pocket Computer Programming Tips & Tricks, secrets, hints, 
shortcuts, techniques from a master programmer, 
128 pages. $7.95 

50 Programs in BASIC for Home, School & Office, sourcebook of 
tested ready-to-type-in-and-run software for TRS-80 and Sharp 
pocket computers, 96 pages. $9.95 

50 MORE Programs in BASIC for Home, School & Office, ideal 
source for lots more useful software for TRS-80 and Sharp pocket 
computers, 96 pages. $9.95 

Murder in The Mansion and Other Computer Adventures, with 24 
game programs: murder mystery, space, adventure, loads of fun 
for TRS-80 and Sharp pocket computers, 96 pages. $6.95 

Pocket Computer Programming Made Easy, new fast 'n easy way 
to learn BASIC, make your computer work for you, for TRS-80, 
Sharp, Casio pocket computers, 128 pages. $8.95 

35 Practical Programs for the Casio Pocket Computer, book of 
useful type-in-and-run software for the FX-702P, 96 pages. $8.95 
Pocket-BASIC Coding Form, preprinted program worksheets 
make writing programs a breeze; for TRS-80, Sharp, Casio 
pocket computers, 40-sheet pad. $2.95 

Universal BASIC Coding Form, programming worksheets for 
anybody writing in BASIC for any computer system, make writing 
program lines easy and fun . 40-sheet pad . $2.95 

Order direct from this ad. Send check or money 
order. Include $1 shipping for each item ordered up 
to a maximum of $3 shipping. Or write for our free 
catalog. Mail your order to: 

ARCsoft Publishers 

Post Office Box 132Z 
Woodsboro, Maryland 21798 

(301) 663-4444 
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10100 REM COMPUTATION. THE SI 

ZE OF MATRIX A IS N X N. 
10110 REM B = VECTOR OF ORIGINAL C 

ONSTANTS (LENGTH N) 
10120 REM WHICH ARE REPLACED B 

Y FINAL SOLUTION 
10130 REM VALUES, VECTOR X. 
10140 REM N = NUMBER OF EQUATIONS 

AND VARIABLES. 
10150 REM KS = OUTPUT DIGIT. 
10160 REM FOR A NORMAL SOLUT 

ION. 
10170 REM 1 FOR A SINGULAR SET 

OF EQUATIONS. 
10180 REM REMARKS: 
10190 REM MATRIX A MUST BE SQUARE OF 

DIMENSION N X N. 
10200 REM VECTOR B MUST HAVE LENGTH 

N. IF MATRIX A IS 
10210 REM SINGULAR, SOLUTION VALUES 

ARE MEANINGLESS. 
10220 REM METHOD* 
10230 REM THE METHOD OF SOLUTION IS 

BY ELIMINATION USING 
10240 REM THE LARGEST PIVOTAL DIVISO 

R. EACH STAGE OF 

10250 REM ELIMINATION CONSISTS OF IN 
TERCHANGING ROWS 

10260 REM WHEN NECESSARY TO AVOID DI 

VISION BY ZERO OR 
10270 REM SMALL ELEMENTS. THE FOFWA 

RD SOLUTION TO 
10280 REM OBTAIN VARIABLE N IS DONE 

IN N STAGES. THE 
10290 REM BACK SOLUTION FOR THE OTHE 

R VARIABLES IS 
10300 REM CALCULATED BY SUCCESSIVE S 

UBSTITUTIONS. 
10310 REM FINAL SOLUTION VALUES ARE 

DEVELOPED IN VECTOR 
10320 REM B, WITH VARIABLE 1 IN B(l) 

, VARIABLE 2 IN B(2), 
10330 REM , VARIABLE N IN B(N) 

. IF NO PIVOT CAN 
10340 REM BE FOUND EXCEEDING A TOLER 

ANCE OF 0.0, THE 
10350 REM MATRIX IS CONSIDERED SINGU 

LAR AND KS IS SET 
10360 REM EQUAL TO 1. THIS TOLERANC 

E CAN BE MODIFIED 
10370 REM BY REPLACING THE STATEMENT 

FOR TL IN LINE 10410. 
10380 REM 

10390 REM FORWARD SOLUTION 
10400 REM 

10410 TL = 0:KS = 0:JJ = -N 
10420 FOR J=»1T0N»JY»J+1 :JJ 
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= JJ + N+1:BA = 0: 
IT = JJ - J 
10430 REM 

10440 REM SEARCH FOR MAXIMUM COEFFICIEN 

T IN COLUMN 
10450 REM 

10460 FOR I * J TO N : IJ = IT + I 
10470 IF ABS(BA) - ABS(A(U)) >= THEN 
NEXT I 

ELSE BA » A(IJ) : RB = l/BA : IM 

= I : NEXT I 
10480- REM 
10490 REM TEST FOR PIVOT LESS THAN TOLE 

RANGE (SINGULAR A-MATRIX) 
10500 REM 
10510 IF ABS(BA) - TL > THEN 10550 EL 

SE KS = 1 » GOTO 10740 
10520 REM 

10530 REM INTERCHANGE ROWS IF NECESSARY 
AND 

DIVIDE EQUATION BY LEADING CO 

EFFICIENT 
10540 REM 

10550 II ■ J + N*(J-2) t IT = IM - J 
10560 FOR K = J TO N : II = II + N : 12 
» II + IT t SE ■ A(I1) : A(I1) 

- A(I2) : A(I2) » SE : A(I1) = A(ll)* 

RB : NEXT K 
10570 SE - B(IM) : B(IM) = B(J) : B(J) 

» SE*RB 
10580 REM 

10590 REM ELIMINATE NEXT VARIABLE 
10600 REM 

10610 IF J " N THEN 10680 ELSE IQ = N*( 

J-l) 
10620 FOR IX = JY TO N : IZ = IQ + IX i 

IT =» J - IX 
10630 FOR JX * JY TO N : IA = N*(JX-1) 

+ IX : JC = IA + IT : 

A(IA) = A(IA) - A(IZ)*A(JC) : NEX 

T JX 
10640 B(IX) - B(IX) - B(J)*A(IZ) t NEXT 

IX I NEXT J 
10650 REM 

10660 REM BACK SOLUTION 
10670 REM 

10680 NY = N - 1 i IT = N*N 
10690 FOR J = 1 TO NY : IA=IT-J: I 

B = N-J:IC»N 
10700 FOR K * 1 TO J » B(IB) = B(IB) - 

A(IA)*B(IC) * 

IA = IA - N : IC = IC - 1 : NEXT 
K : NEXT J 
10710 REM 

10720 REM RETURN TO CALLING PROGRAM 
10730 REM 
10740 RETURN ■ 
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A comprehensive genealogical program that lets you avoid the rigidities of paper-based family 
trees. It quickly and easily sets up a data base to hold pertinent information about each ancestor, 
including name, date and place of birth, marriage and death information, plus a comment line. 

YOUR FAMILY TREE will display and print a complete "pedigree" for any selected family 
member; or a 3-generation ancestral chart may be generated for display or printer, showing the 
number of known ancestors beyond each branch of the tree. As a novelty feature, the program will 
display a U.S. outline map showing migration across the country. Access to information in YOUR 
FAMILY TREE is virtually unlimited, with full search capabilities on any key field— using full or 
partial information. 

16K RAM has space for 45-55 ancestors with brief comments. A 32K cassette-based system will 
hold about 175 records; a 48K, about 300. In all cases, a disk-based system will hold about 75 less 
due to DOS overheard. 

Available for TRS-80* models I and III on tape or disk, YOUR FAMILY TREE requires a minimum of 
16K RAM. Enjoy the benefits of this powerful and flexible charting system now for just $29.95. 
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By Andrew P. Bartorillo 

A complete management tool for 
the home budget, it accurately 
keeps track of your checkbook 
and provides an easy method of 
budget allocation. 

You can store information on up to 
100 checkbook entries per month 
(250 with 48K), specify any 
automatic withdrawals, keep 
records of tax-deductibles, and 
record expenses by category. You 
can even break up charge account 
payments into the proper 
categories. 

Requires TRS-80* model I or III 
with a minimum of 32K and one 
disk drive. Order now for only 
$39.95. 





By David Feitelberg 

It's the world's first deep space 
colony and you are the economic 
manager. A remarkable simula- 
tion, LOST COLONY arms you 
with maps and charts as tools for 
resource management. You 
assign human and robotic labor, 
explore new land, and set produc- 
tion quotas. At the same time you 
must determine equitable pay 
scales and taxes. 
Communicate through your Model 
I or III using full sentences or 
short commands. A challenging 
game, it might give you insight in- 
to real life management as well. 
Available on 16K tape or 32K disk 
for only $19.95 each. 



SPiCi ROCKS 

By Steven Kearns 

Huge antimatter rocks appear on 
the Tactical Display Screen of 
your spacecraft. You blast away 
but they just explode into smaller 
chunks for you to destroy. To add 
to your woes, alien ships and time 
bombs appear periodically. If the 
ships hit you or the timers reach 
zero— BOOM! Maneuver, fire 
lasers, jump to hyperspace— 
anything to avoid the onslaught. 
For one or two players, with nine 
skill levels. 

A realtime arcade game with 
sound, for TRS-80* model I or III. 
Versions for 16K tape or 32K disk 
are $19.95 each. 




(202) 544-4259 

Acorn 

Software Products, Inc. 



634 North Carolina Avenue, S.E., Washington, D.C. 20003 



•Trademark of Tandy Corp. 

ALL ACORN ENTERTAINMENT 

SOFTWARE SUPPLIED FOR 

TRS-80* MODELS I & III 

MAIL ORDERS: Include $2.00 shipping & handling 
(D.C. residents add 6% sales tax). 
CHARGE CARD CUSTOMERS: Call (202) 544-4259 
for fastest service. 
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Small business 
invoice program 

Generates an invoice and label 

Model I/III and Color Computer with 16K extended BASIC 

Fred Blechman, Canoga Park, CA 



If you operate a business, you use an invoice of some 
sort. You may call it an order form, purchase order, bill, 
sales receipt, sales ticket, job order or something else. If 
you regularly sell ten different items or less, this 



The author, Fred Blechman. 




program will print and total your invoice, showing each 
purchase as well as special items and remarks. It will 
indicate the amount of any overpayment or amount due 
and will also print out address labels. 

The Need Arises 

When I started a small mail order business selling 
software for the Radio Shack TRS-80 a few years ago, I 
used a small, two-part carbon sales book — the kind you 
get for about 30 cents at a five-and-dime or stationary 
store. It looked Mickey Mouse and was! As the business 
grew and I offered more items for sale, the invoice got 
more complicated. 

When business income made a custom invoice 
affordable, I had a local print shop run invoice forms 
with my company name, address and phone number. I 
still wrote out each invoice and shipping label until one 
day it dawned on me . . . Here I was selling computer 
programs and not using the computer for a job it could 
easily do. So, I wrote the Small Business Invoice 
Program. 

Not for Everyone 

If you're conversant in BASIC, you can see from the 
program listing how simple and unsophisticated it is. 
For that reason, it has some practical limitations. Of 
course, you must have a printer, since the purpose of the 
program is to generate an invoice and address labels. 
However, if you sell more than ten different items, this 
program won't do the job without several changes 
beyond the scope of this article. 

As written, the program is intended for use with 
carbon paper or NCR forms since it prints out in real 
time and the information is not stored for additional 
copies or historical records. These compromises in 
capability greatly simplify the program but will not 
satisfy all needs, even though they satisfy mine. 

My printer is an Okidata Microline 80 which handles 
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up to three thicknesses of paper as well as roll and pin 
feed paper. If your printer does not handle more than 
one thickness of paper, you can't use this program 
properly, this program is designed for a 4y 2 " wide form. 
If your printer does not have condensed characters, you 
can use an 8'/ 2 " wide invoice form. If your printer only 
has tractor or pin feed, you'll have to tape the invoice to 
the top of your regular paper and have it carry the 
invoice through the printer. Of course, you can also buy 
pre-printed tractor fed invoice forms — but if you're that 
big a spender, you'll probably want something more 
elaborate than this "plain vanilla" invoice program. 

Look at the sample run and use the program as it is a 
few times to become familiar with the prompts, screen 
display and printout. The text, item descriptions and 
prices are, of course, the ones I use. You must customize 
the program for your own use. 

Customizing 

Enter the description and price of each item you sell 
on a separate DATA line, starting at line 1000. Looking 
at lines 1000-1030 in the lasting as examples, notice that 
each line contains a short description followed by a 
comma and then the unit price. Do not enter more than 
ten items since the program will ignore any beyond ten. 
Do not omit line 1200 as it is needed when you have less 
than ten items. 

Next, correct lines 240-330 to reflect your own DATA. 
Each DATA item is entered into arrays A$(X) and P(X) 
by lines 210-330. The first DATA item is A$(l), with a 
price of P(l) and goes to A$(5) in line 285 since I have 
five items for sale. If you have more than four items, add 
them between lines 280 and 290. If you have more or less 
than five DATA items, renumber the (6) and (7) in lines 
290, 300, 310, 320, 330, 420 and 430. 

Change the text in lines 20-50 to provide instructions 
for proper alignment of your own invoice form and put 
your name, instead of mine, in line 810. The sales tax is 
calculated and printed by program line 530 as 6 percent 
of the total (T=.06*TT). If necessary, change this and 
"6% CA SALES TAX" later in line 530. 

This all sounds like a lot of work. Itisn't. The changes 
are pretty obvious once you get the hang of the program 
and they are easier to do than to describe. Once you 
customize the program to your own needs, you can make 
copies for everyday use without making any changes. 

Using the Program 

Using the program is very easy. Load the customized 
program into your TRS-80, type and enter RUN. Insert 
your invoice form in the printer and make sure it's ready 
to print. Now, using the keyboard, follow the screen 
prompts to enter the date, customer name and address. 
Three address lines are available. If you don't need the 
last one, just press ENTER. This information will print 
out on the invoice one line at a time as it's entered. If you 
start a line with a quotation mark, you can use any 
punctuation on that line except another quotation 
mark. 

Once you've completed the customer information, the 
screen will show a menu of items that can be ordered by 
number. Just type and ENTER the menu number and 
the screen will confirm the choice and ask you the 



Sample Run 



Blechman Enterprises 



721 7 BERNADINE AVE. 

CANOGA PARK. CALIFORNIA BI307 

PHONE (AREA 213) 346-70J4 



^ 



PHONE: (213)999-8888 



5/23/81 

JOE DOflKS 
123 4th ST. 
RNYTOHN CA 91399 



1 AMHAY PRODUCT DISTRIBUTOR PROSRAHS 

1 SMALL HOME-BUSINESS PROGRAMS 

1 "PROGRAMS FOR BEGINNERS " BOOK 

1 ' ' PROGRAMS FDR BEGINNERS " CASSETTE 



3B.8B 

25.88 

8.95 

10.95 



TOTAL 

6% CA SALES TAX... 
SHIPPING/HANDLING. 
GRAND TOTAL 



74.98 
4.49 
8.88 

79.39 



PAID CHECK 1 123 $ 74.9 AMOUNT DUE: 
BOOK AND TAPE BEING SENT SPECIAL, 

THANKS FOR THE ORDER 




$ 4.49 . PLEASE REMIT. 
S MAIL. 



Sample Address Label 



JOE DOPlKS 
123 4th ST. 
RNYTOWN CR 



91399 



quantity. Type and Enter the quantity. That item, 
with theiextended price, will be printed on your invoice 
(but not on the screen). The computer memory keeps 
track of total cost. 

Notice my menu item (6) is Special Order Item which 
can be used to type in anything for that line. I use this 
for special items not in DATA or quantity discounts. 
Enter the description, price each (using a minus number 
for discount, refund, rebate or other negative amount) 
and quantity. 

When all items have been entered, Type and Enter 
the menu number for End of Order. Ans wer Y or N to the 
sales tax question. If you select N, the sales tax will be 
ignored by the printer. 

You have the opportunity to enter a shipping and 
handling charge, after which a grand total is printed. 
The program calculates whether the payment was 
correct, over or under, and prints the appropriate 
message and amount. 

If you have any remarks, such as specifying separate 
ships, back orders, price change or a personal message, 
the program will print one line at a time until you 
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respond with N to the remarks query. When you've 
finished your remarks, the program prints "Thanks for 
the Order!" followed by your name, then moves beyond 
the bottom of the invoice for easy removal from the 
printer. 

Now you can print as many address labels as you 
need after removing your invoice and positioning the 
printer paper. The labels may be applied with rubber 
cement or any other adhesive. I prefer 2" clear plastic 
tape to protect the label as well as hold it in place. 

Special Program Commands 

There are three special commands in this program 
that require some explanation. Two of them involve the 
Microline 80 printer. Your printer may require a 
different command. In program line 70, the 
LPRINTCHR$(29) sets the printer to 16.5 characters per 
inch instead of the normal 10. This condensed printing 
is necessary to get a reasonable amount of information 
on the 4y 2 " wide invoice I use. In line 820, the 
LPRINTCHR$(30) returns the printer to 10 characters 
per inch for printing address labels. 

The last program line, 2000, allows you to make two 
complete program copies on cassette with a two-second 
gap between them. Just Type and Enter RUN 2000 
with your recorder ready to record. This works without 
change for the Model I. However, for the Model III, 
change OUT255,4 to OUT236.2. Other than that, the 



Program Variables 
In Order of Appearance 

DA$ Date 

P$ Phone number 

N$ Customer name 

Al$ First address line 

A2$ Second address line 

A3$ Third address line 

T Total item price 

TT Total order price 

X READ-DATA counter 

A$(X) Item description 

P(X) Item each price 

M Menu item number 

Q Quantity 

PR$ PRINTUSING item format string 

TT$ PRINTUSING total format string 

X$ Sales tax Y/N response 

H Shipping/handling charge 

PAY$ Check Y/N response 

CH Check number 

CA Check amount 

OP Overpaid amount 

AD Amount due 

R$ Remark Y/N response 

X Blank line counter 

L$ Label Y/N response 

X Continue program response 

D$ Item description 

P Price each 

I Interval loop counter 



rest of the program will work with either Model I Level 
II or Model III BASIC. 

So there it is. I've found this program saves me time, 
eliminates errors and confusion, makes my invoices 
consistent and provides a professional image for my 
small software business. If you wish to save program 
entry /debugging time, send $6 to Blechman 
Enterprises, 7217 Bernadine Ave., Canoga Park, CA 
91307 (213)346-7024 for a program cassette (postpaid 
USA and Canada; $2 shipping foreign. CA residents 
add 6% sales tax) complete with an actual invoice! 

This program is one of six programs in the Small 
Home Business Package available for $29.95 from the 
author. Write him for details. 



Listing 1 

Small Business Invoice Program 

for Models I and III 



10 CLS:CLEAR200:REM * COPYRIGHT FRED EL 

ECHMAN 1981 * 5/23/81 * 

20 PRINT: PRINT" BLECHMAN ENTERPRISES INV 

OICE PROGRAM: 

30 PRINT :PRINT"PIACE NCR 5-1/2 X 4-1/4 

INVOICE FORM IN PRINTER, WITH LEFT EDGE 

40 PRINT"OF FORM AT LEFT EDGE OF CUTTTN 

G BAR, AND LOWER LINE OF LOGO AT 

50 PRINT"THE TOP OF THE CUTTING BAR 

60 PRINT: PRINT "MAKE SURE PRINTER IS ON 

AND READY ": PRINT : PRINT 

70 PRINT :LPRINTCHR$ (29) 

80 INPUT"DATE (MM/DD/YY) " ; DA? : LPRINT DA 

$;:LPRINTTAB(30) 

90 INPUT"ENTER PHONE, IF KNOWN. . .";P$:I 

F P$<>"" LPRINT"PHONE:";P$:ELSE LPRINT" 

PHONE: UNKNOWN" 

100 PRINT: LPRINT" " 

110 REM * ENTER NAME AND ADDRESS - 4-LI 

NES MAX. * 

120 INPUT"NAME";N$:LPRINTN$ 

130 Al$=" ": INPUT "ADDRESS LINE (NO COMM 

AS)";A1$:LPRINTA1$ 

140 A2$=" ":INPUT"ADDRESS LINE (NO COMM 

AS) ";A2$:LPRINTA2$ 

150 A3$=" ": INPUT" ADDRESS LINE (NO COMM 

AS) " ; A3$ :LPRINTA3$ 

160 T=0:TT=0 

200 LPRINT" ":REM * SELECT ORDERED ITEM 

S * 

210 FOR X=1TO10 

220 READ A$(X),P(X):IF A$(X)="END" GOTO 

240 

230 NEXTX 

240 CLS: PRINT :PRINT"WHICH OF THE FOLLOW 

ING ITEMS ARE ORDERED?" 

250 PRINT :PRINT"(1) ";A$(l) 
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CHEXTEXT 

Let your TRS-80* 1 do the proofreading on 
your SCRIPSIT** text files!! 

Features of this program include: 

• Complete dictionary maintenance in- . 
eluding the addition and deletion of 
words. 

• Menu driven for ease of operation. 

• Spelling Checker 

• FREE expanded dictionaries avail- 
able, depending on your drive 
storage capabilities. 

NEW LOWER PRICE $59.95 



MODEL III PRICE LIST 

(All 48K with TANDON drives) 

1 single aided 40 track drive $1 695.00 

2 single sided 40 track drives 1 895.00 

1 dual sided 40 track drive 1 820.00 

2 dual sided 40 track drives 21 45.00 

1 single sided 80 track drive 1 845.00 

2 single sided 80 track drives 21 75.00 

1 dual sided 80 track drive 1 995.00 

2 dual sided 80 track drives 2395.00 

with RS-232 C Add 11 5.00 

NOTE: These Model III computers contain Apparat 
installed disk drives and memory. They are warranted 
by Apparat. Inc. for 90 days. 




MISCELLANEOUS SUPPLIES 

DISKETTES 

Double density-soft sectored-replacement guaranteed. Spindle/Hub 
protected. (5V4" only) 

Verbatim Datalife 5 'A" 40 track $24.95 

Apparat's No Name 5'A" 40 track $19.95 

Verbatim Datalife 8" model II $39.95 

PAPER 
9'/ 2 "x1 1" blank white, tractor feed paper, full box 15# or 20#. .. $24.95 

14V 2 "x1 1" green bar, tractor feed paper, full box $34.95 

3Vi"x15/16" tractor feed mailing labels $19.95 

OTHER 

5VV plastic library case $ 1 .95 

8" plastic library case $ 4.95 

5'A" Flip-sort $18.95 

8" Flip-sort $31 .95 

1 6K memory kits $1 9.95 



APPARAT'S PROM BLASTER 

An eprom programmer tor all 25 X X and 27 X X chips. TRS-80* 

MOD I & III $149.00 

CABLE $ 1 7.95 

BUS EXTENDER 

mini version with 2 card slots and no enclosure $ 69.95 



SPECIAL - FREE GRAFTRAX 

with EPSON MX-80 Printers 

MX-80 $499.00 

MX-80F/T $575.00 

MX-100 $775.00 

Printer Cables $24.00 

(Specify Computer Type) 

WE ALSO STOCK OKIDATA& NEC PRINTERS 
CALL FOR PRICES 




ASSORTED ITEMS OF INTEREST 

MICRO CLINIC, Mod I $24.95, Mod III $29.95 

The ultimate in memory & disk diagnostics 
MEAL MASTER, Mod I & III Disk $24.95 

meal planning & grocery shopping aid 
FLEXTEXT/80 (requires Graftrax) $34.95 
ultilize the additional features of the MX-80 

printers under model I & III scripsit 

MICRO ACCOUNTING SYSTEM, $479.00 

Interactive G/L, A/R, A/P & checkbook manager 

UNI-TERM/80, $89.00 

Universal terminal program that takes advantage 

of the extended NEWDOS/80 commands 

BASIC BETTER & FASTER BOOK, $23.95 



NEW LOWER PRICES ON 
TANDON DISK DRIVES 

Complete with power supply, chassis & configured for 
TRS-80" Model I or III 

I • Single sided 40 track $285.00 

| • Dual 40 or Single 80 track $415.00 

Dual sided 80 track $515.00 

Special - 2*Dual sided 80's $999.00 

(ADDSALMOST 1 .5 MEGABYTES OF STORAGE «l 

TO A D. D. MOD I OR A MOD III) 

I MODEL I DOUBLE fefeLiJ 

DENSITY PACKAGE \Wi % 

Converts a standard TRS-80 Model I | ^B 

I to Double Density. itf^BlIll 

ApparatDoubler&NEWDOS/80V2.0. I _■ 

$278.00 value for only $21 9.00 ip^^SF 
Doubler alone $129.00 



nvvvuudou 



Version 2.0 



The most sophisticated DOS ever pro- 
duced for the TRS-80" Models I and III. It 
provides the user with "MAINFRAME" 
power on a "MICRO". 

Some Features available are: 

• Jobstream Control Language 

• Mod I/Mod III Diskette interchangability 

• Double Density Support *on Model I 

• Pagenation of BASIC listings on the screen 

• Basic program single stepping 

• Dynamic variable manipulation 

• Multiple array sorts with BASIC CMD 

• Complete technical support provided 

All this plus much more for only 
$149.00 



lnioWotld 

Software Report Card 

NEWDOS/80 
Version 2.0 



Performance 
Documentation 
Ease of Use 
Error Handling 



£ & & a 

D □ D 

D D O 

□ □ £3 D 

D □ O 




£-3 






/\k_/|<^'V>4l \-A I / II Iv^. •Ongoing Support for Microcomputers' 
4401 S Tamarac Pkwy . Denver. CO 80237 . (303) 741 -1 778 • (800) 525-7674 

S( tipsit S TRS 80 are ,) registered trademark of Tandy Corporation 
Freight FOB Denver call for shipping charges Foreign Orders shipped Air Freight , 
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260 PRINT" (2) ";A$(2) 
270 PRINT" (3) ";A$(3) 
280 PRINT" (4) ";A$(4) 
285 PRINT" (5) ";A$(5) 
290 PRINT" (6) SPECIAL ORDER ITEM. . 

II 

• • • • 

300 PRINT" (7) END OF ORDER " 

310 PRINT: INPUT"PRESS 1,2,3,4,5,6 OR 7 

ONLY AND ENTER" ;M 

320 IF M<1 OR M>7 GOTO 310 
' 330 IF M=6 OR M=7 GOTO400 
340 PRINT :PRINT"HOW MANY ";A$(M); : INPUT 
" ORDERED" ;Q:T=Q*P(M):TT=TT+T 
400 PR$="### % 

% ####•##" 
410 TT$="% 

% ####.##" 
420 IF M=6 GOTO900 
430 IF M=7 GOTO500 
440 LPRINTUSINGPR? ; Q ; A$ ( M) ; T 
450 GOTO240 
500 PRINTSTRING? ( 62, "-" ) : PRINTUSINGTT? ; 

TOTAL ";TT 

510 LPRINTSTRING$(62,"-"):LPRINTUSINGTT 

$;" TOTAL 

";TT 

520 PRINT :INPUT"SALES TAX (Y/N)";X$ 
530 IFX$="Y" THEN T=.06*TT:T=INT(T*100+ 

.5)/l00:PRINTUSINGTT$;" TAX ";T: 

LPRINTUSINGTT$;" 

6% CA SALES TAX ";T:TT=TT4T 

540 PRINT: INPUT"ENTER SHIPPING/HANDLING 
(0 IF NONE)";H:TT=TT+H 

550 PRINTUSINGTT$ ; " HANDLING 

" ; H : LPRINTUSINGTT$ ; " 

SHIPPING/HANDLING " ; H 

560 PRINTUSINGTT$ ; " GRAND TOTAL 

" ?TT:LPRINTUSINGTT$ ; " 

GRAND TOTAL 

• • • • 7 i. i. 

570 LPRINT" ":INPUT"PAID CHECK (Y/N)";P 

AY$ 

580 IF PAY$="Y" INPUT"CHECK NUMBER" ;CH: 

LPRINT"PAID CHECK #";CH; 

590 IF PAY$="Y" INPUT"CHECK AMOUNT" ;CA: 

LPRINT"$";CA; 

600 OP=CA-TT:AD^rT-CA:OP=INT(OP*100+.5) 

/100 : AD=INT ( AD*100+ . 5 ) /100 

610 IF OP>0 PRINT"OVERPAID $";OP:LPRINT 

"OVERPAID $";OP;"l REFUND ENCLOSED. ": GO 

TO650 

620 IF AD>0 PRINT"AMOUNT DUE: $";AD:LPR 

INT"AMOUNT DUE: $";AD;". PLEASE REMIT." 

:GOTO650 

630 IF OP=0 AND AD=0 THEN PRINT" CORRE 

CT AMOUNT.": LPRINT" CORRECT AMOUNT. ":GO 

TO650 
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640 LPRINT" ": PRINT 

650 INPUT"ANY REMARKS (Y/N)";R$ 

660 IF R$="Y" THEN R$=" ":PRINT"TYPE AN 

D ENTER REMARKS, STARTING WITH QUOTE": I 

NPUTR$ 

670 IF R$="N" GOTO800 

680 LPRINTR$:GOTO650 

800 LPRINT" ":LPRINT"THANKS FOR THE ORD 

ERl" 

810 LPRINT" FR 

ED BLECHMAN 

820 F0RX=1T05: LPRINT" ":NEXTX: PRINT :LPR 

INTCHR$(30) 

825 L?="Y" : INPUT" ADDRESS LABEL (Y/N)";L 

$ 

830 IF L$="Y" INPUT"REMOVE INVOICE AND 

PREPARE PRINTER PAPER. PRESS ENTER. . . " ; 

X 

840 IFL$="Y" LPRINTN$:LPRINTA1$:LPRINTA 

2$:LPRINTA3$ 

845 INPUT"ANOTHER LABEL (Y/N) ";L$:IF L$ 

="Y" LPRINT" ": LPRINT" ":GOTO840 

850 CLEAR50:END 

900 PRINT: INPUT"DESCRIPTION OF ITEM";D$ 

910 INPUT"PRICE EACH";P:INPUT"HOW MANY" 

;Q:T=Q*P:TT^TT+T 

920 LPRINTUSINGPR$;Q;D$;T:GOTO240 

1000 DATA AMWAY PRODUCT DISTRIBUTOR PRO 

GRAMS, 30 

1010 DATA SMALL HOME-BUSINESS PROGRAMS, 

25 

1015 DATA ORDER VERIFICATION UPDATE, 10 

1020 DATA" ' 'PROGRAMS FOR BEGINNERS. .... 

' ' BOOK", 8. 95 

1030 DATA TELEPHONE PROGRAMS, 10 

1200 DATA END,0 

2000 CSAVE"1":OUT255,4:FORI=1TO2000:NEX 

T:CSAVE"1" 

Listing 2 

Small Business Invoice Program 

For the Color Computer 

10 CLS:CLEAR200 

20 PRINT: PRINT: PRINT :PRINT"PLACE NCR 5- 
1/2 X 4-1/4 INVOICE FORM IN PRINTER, WI 
TH LEFT EDGE OF FORM AT LEFT EDGE OF CU 
TTING BAR, AND LOWER LINE OF LOGO AT 
50 PRINT"THE TOP OF THE CUTTING BAR." 
60 PRINT :PRINT"MAKE SURE PRINTER IS ON 

AND READY ":PRINT:PRINT 

70 PRINT :PRINT#-2,CHR$ (29) 

80 INPUT"DATE (MM/DD/YY)";DA$:PRINT#-2, 

DA$; :PRINT#-2,TAB(30) 

90 INPUT"ENTER PHONE, IF KNOWN. . .";P$:I 

FP$<>"" THEN PRINT#-2, "PHONE: ";P$: ELSE 

PRINT#-2, "PHONE: UNKNOWN" 
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100 PRINT :PRINT#-2," " ' 

110 REM *ENTER NAME AND ADDRESS -4- LIN 

ES MAX. * 

120 INPUT"NAME";N$:PRINT#-2,N$ 

130 Al$=" . ":INPUT"ADDRESS LINE (NO COMM 

AS) ";A1$:PRINT#-2,A1$ 

140 A2$=" ":INPUT"ADDRESS LINE (NO OOMM 

AS) ";A2$:PRINT#-2,A2$ 

150 A3$=" ":INPUT"ADDRESS LINE (NO OOMM 

AS) ";A3$:PRINT#-2,A3$ 

160 T=0:TT=0 

200 PRINT#-2," ":REM SELECT ORDERED ITE 

MS 

210 FOR X=1TO10 

220 READ A$(X),P(X):IFA$(X)="END"GOT024 



230 NEXT X 

240 OjS: PRINT :PRINT"WHICH OF THE FOLLOW 

ING ITEMS ARE ORDERED" 

250 PRINT : PRINT" (1) ";A$(1) 

260 PRINT" (2) ";A$(2) 

270 PRINT" (3) ";A$(3) 

280 PRINT" (4) ";A$(4) 

285 PRINT" (5) ";A$(5) 

290 PRINT" (6) <SPECIAL ORDER ITEM>" 

300 PRINT" (7) <END OF ORDER>" 

310 PRINT: INPUT"PRESS 1,2,3,4,5,6 OR 7 

ONLY AND ENTER" ;M 

320 IF M<1 OR M>7 GOTO 310 

330 IF M=6 OR M=7 GOTO 400 

340 PRINT : PRINT"HOW MANY " ; A$ (M) ; : INPUT 

" ORDFJ^ED";Q:T^*P(M):TT=TT+T 

400 PR$="### % 

% ####.##" 
410 TT$="% 

% ####.##" 
420 IF M=6 GOTO 900 
430 IF M=7 GOTO 500 
440 PRINT#-2,USINGPR$;Q;A$(M);T 
450 GOTO 240 
500 PRINTSTRING$(62,"-"):PRINTUSING TT$ 

TOTAL ";TT 

510 PRINT#-2,STRING$(62,"-"):PRINT#-2,U 
SINGTT$;" TOT 

AL ";TT 

520 PRINT :INPUT"SALES TAX (Y/N)"7X$ 

530 IFX$="Y"THEN T=.06*TT:T=INT(T*100+. 

5 ) /100 : PRINTUSINGTT? ; " TAX " ; T : P 

RINT#-2, USINGTT? ; " 

6% CA SALES TAX ";T:TT=TT 

-KT 

540 PRINT: INPUT"ENTER SHIPPING/HANDLING 
(0 IF NONE";H:TT=TT4H 

550 PRINTUSINGTT?;" HANDLING 

";H:PR[NT#-2,USINGTT$; " HANDING 

...";H 



560 PRINTUSINGTT$; " GRAND TOTAL. . . . 

";TT:PRINT#-2,USINGTT$;" 

GRAND TOTAL 

";TT 

570 PRINT#-2," ":INPUT"PAID CHECK (Y/N)" 

;PAY$ 

580 IF PAY$="Y" THEN INPUT"CHECK NUMBER 

";CH:PRINT#-2,"PAID CHECK #";CH; 

590 IF PAY$="Y" THEN INPUT"CHECK AMOUNT 

";CA:PRINT#-2,"$";CA; 

600 OP=CA-TT:AD^rT-CA:OP=INT(OP*100+.5) 

/100: AD=INT(AD*100+ .5 ) /100 

610 IF OP>0 THEN PRINT"OVERPAID $";OP:P 

RINT#-2, "OVERPAID $";OP;" REFUND ENCLOS 

ED.":GOTO650 

620 IF AD>0 THEN PRINT"AMOUNT DUE: $";A 

D:PRINT#-2, "AMOUNT DUE: $"; AD; ".PLEASE 

REMIT. ":GOTO650 

630 IF OP=0 AND AD=0 THEN PRINT"CORRECT 

AMOUNT. ":PRINT#-2," CORRECT AMOUNT. ":G 
OTO650 

640 PRINT#-2," ": PRINT 
650 INPUT "ANY REMARKS (Y/N)";R$ 
660 IF R$="Y" THEN R$=" ":PRINT"TYPE AN 
D ENTER REMARKS, STARTING WITH QUOTE": I 
NPUT TR$ 

670 IF R$="N" GOTO 800 
680 PRINT#-2,TR$:GOTO650 
800 PRINT#-2," ":PRINT#-2, "THANKS FOR T 
HE ORDER!" 
810 PRINT#-2," 

FRED BLECHMAN" 
820 FORX=lT05:PRINT#-2," ":NEXTX: PRINT: 
PRINT#-2,CHR?(30) 

825 L$="Y":INPUT"ADDRESS LABEL (Y/N)";L 
$ 
830 IF L$="Y" THEN INPUT"REMOVE INVOICE 

AND PREPARE PRINTER PAPER. PRESS ENTER 
"•y 

840 IF L$="Y" THEN PRINT#-2,N$:PRINT#-2 

,A1$:PRINT#-2,A2$:PRINT#-2,A3$ 

850 CLEAR 50:END 

900 PRINT :INPUT"DESCRIPTIQN OF ITEM";D$ 

910 INPUT"PRICE EACH";P:INPUT"HOW MANY" 

; Q:T=Q*P :TT=TT4T 

9 20 PRINT#-2 , USINGPR? ; Q; D$ ; T : GOTO240 

1000 DATA AMWAY PRODUCT DISTRIBUTOR PRO 

GRAMS, 30 

1010 DATA SMALL HOME-BUSINESS PROGRAMS, 

25 

1015 DATA ORDER VERIFICATION UPDATE, 10 

1020 DATA" ' 'PROGRAMS FOR BEGINNERS 

' ' BOOK", 8. 95 

1030 DATA TELEPHONE PROGRAMS, 10 

1200 DATA END,0 

1300 END ■ 
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Financial program 



Interest calculations 

Generate comparative data 
with your microcomputer 



Model I/HI 



Charles R. Jones, Germantown, MD 



This program manipulates several variations of 
interest calculations in a manner that is somewhat 
instructional as well as useful. The first three types of 
interest calculations allow experimentation by 
allowing any of the variables to be "unknown". They 
are progressively more difficult and lead into the last 
three variations, which sound more complex but are 
actually just as straightforward. The six aspects of 
interest calculations presented (simple, compound, debt 
payments, savings accumulation, annuities and 
perpetuities) represent the most concise yet complete 
program that you will be likely to find anywhere. 

The fourth variation uses a printer since it is a little 
more complex. One of my friends tried to get a savings 
account forecast from his bank, assuming that he 
deposited his retirement check every month at the new 
high interest rates. His check increases annually with 
the cost of living, but Uncle Sam has to have his cut. 
Needless to say, his bank could not help, and he asked 
me to generate some comparison data on my TRS-80. 

Many of us freeze up and stumble over problems like 
this which are supposedly a snap. All that is needed is a 
quick reminder of the variables involved and a program 
to sort out the question that we are really asking. For 
example, the third variation will refine your debt 
payments to fit the other data that you have. If it is to 
provide the number of payments, it will usually give you 
an extra payment at a reduced rate rather than a 
fractional payment. Likewise, it will look for the first 
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quarter percent interest rate that satisfies the data since 
most payments are based on fractional interest rather 
than decimal parts. 

Program Listing for 
Interest Calculations 



10 ' INTEREST CALCULATIONS 

20 ' COPYRIGHT 1981 BY CHARLIE JONES 

30 ' REFERENCE TEXT: ENGINEERING ECONOM 

Y BY E. PAUL DeGAFMO 
40 DEFDBL I,P,N,R,S,B 
50 CLS: PRINT "INTEREST CALCULATIONS IND 

EX": PRINT: PRINT 



60 PRINT ' 
70 PRINT ' 

C)" 
80 PRINT ' 
90 PRINT ' 
100 PRINT 
110 PRINT 



1. SIMPLE INTEREST" 

2. COMPOUND INTEREST (BASI 



3. DEBT PAYMENTS" 

4. SAVINGS ACCUMULATIONS" 

5. ANNUITIES" 

6. PERPETUITIES " 

120 PRINT: PRINT: INPUT ■" ENTER THE NUM 
BER DESIRED"; IX: IF IX>6THEN120 ELSE 
CLS:ON IX GOTO 130 ,390 ,560 ,850 
,1320 ,1450 

130 PRINT "SIMPLE INTEREST: I=P*N*R , W 
HERE I IS THE AMOUNT OF" 



QUALITY SOFTWARE FOR TRS-80 COLOR! 




ADVENTURES!!!! 
For TRS-80, and COLOR-80. These Ad- 
ventures are written in BASIC, are full 
featured, fast action, full plotted adven- 
tures that take 30-50 hours to play. 
(Adventures are inter-active fantasies. 
It's like reading a book except that you 
are the main character as you give the 
computer commands like "Look in the 
Coffin" and "Light the torch.") 

Adventures require 16K on COLOR- 
80 and TRS-80. They sell for $14.95 

ESCAPE FROM MARS 

(by Rodger Olsen) 
This ADVENTURE takes place on the 
RED PLANET. You'll have to explore a 
Martian city and deal with possibly 
hostile aliens to survive this one. A good 
first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVEN- 
TURE. It is a treasure hunt in a pyramid 
full of problems. Exciting and tough I 

TREK ADVENTURE (by Bob Retelle) 
This one takes place aboard a familiar 
starship. The crew has left for good 
reasons - but they forgot to take you, 
and now you are in deep trouble. 

DEATH SHIP (by Rodger Olsen) 
Our first and original ADVENTURE, 
this one takes place aboard a cruise ship - 
but it ain't the Love Boat. 

VAMPIRE CASTLE (by Mike Bassman) 
This is a contest between you and old 
Drac - and it's getting a little dark 
outside. $14.95 each. 



SPACE SHUTTLE 
ONE OR TWO PLAYER HIGH RES GAME - 

Your mission is to dock with an orbiting space 
platform — but you may have to land on the 
planetary surface for refueling first. A real value 
in a high res real time game. $6.95. 

KILLERBOT - (Available in 4K) - Real time 
action at 20 levels of difficulty as you run, 
sneak, and dodge your way through a bloody 
field of Killer Robots. Get across or die! Joy- 
sticks or Keyboard controls. TRS-80 COLOR 
(ANY BASIC 4K or more.). $9.95. 

SLASHBALL (Available in 4K) - This one is 
best described as a thinkers arcade game. It 
rewards fast reflexes and clear thinking — like 
nothing you have ever seen before. It is one of 
our best family games for one or two players. 
$9.95. 

TIMETREK -A REAL TIME, REAL GRAPHICS 
STARTRECK. See your torpedoes hit and watch 
your instruments work in real time. No more un- 
realistic scrolling displays! $14.95. 

STARFIGHTER - This one man space war game 
pits you against spacecruisers, battlewagons, and 
one man fighters, you have the view from your 
cockpit window, a real time working instrument 
panel, and your wits. Another real time goody. 
$9.95 

BATTLEFLEET - This grown up version of Bat- 
tleship is the toughest thinking game available on 
OSI or 80 computers. There is no luck involved 
as you seek out the computers hidden fleet. A 
topographical toughie. $9.95 

LABYRINTH - 16K EXTENDED COLOR 
BASIC - With amazing 3D graphics, you fight 
your way through a maze facing real time mon- 
sters. The graphics are real enogh to cause claus- 
trophobia. The most realistic game that I have 
ever seen on either system. $14.95. 





QUEST - A NEW IDEA IN ADVEN- 
TURE GAMES! Different from all the 
others, Quest is played on a computer 
generated map of Alesia. Your job is to 
gather men and supplies by combat, 
bargaining, exploration of ruins and 
temples and outright banditry. When 
your force is strong enough, you attack 
the Citadel of Moorlock in a life or 
death battle to the finish. Playable in 2 
to 5 hours, this one is different every 
time. 16K COLOR-80 OR TRS-80 
ONLY $14.95. 



v#< 




SPACE ZAPPER - Protect your central 
Star Base from ships that attack from 
all four sides. Fast reflexes are required 
as the action speeds up. Great for kids 
or Dads. This game has high speed high 
resolution graphics and looks as if it just 
stepped out of the arcades. — 16K ex- 
tended or 32K disk. BASIC TRS-80 
Color only. $14.95. 




TRS80 




Please specify system on all orders 
This is only a partial listing of what we have to offer. We have arcade and 
thinking games, utilities and business programs for the OS1 and TRS-80 Color. 
We add new programs every week. Send $1.00 for our complete catalog. 

AARDVARK-80 
2352 S. Commerce, Walled Lake, Ml 48088 TRS 80 COLOR 

(313)669-3110 
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140 PRINT "INTEREST IN DOLLARS, P IS TH 

£ PRINCIPAL OR PRESENT" 
150 PRINT "WORTH OF THE MONEY INVOLVED, 

N IS THE NUMBER OF" 
160 PRINT "INTEREST PERIODS, AND R IS T 

HE INTEREST RATE % " 
170 PRINT "PER PERIOD." 
180 PRINT: PRINT 
190 INPUT "WHICH VALUE IS UNKNOWN (ENTE 

R I,P,N OR R) ";U$ 
200 IF U$="I" THEN GOSUB 310 :GOSUB 32 

:GOSUB 330 :GOSUB 340 :GOTO 250 

210 IF U$="P" THEN GOSUB 380 :GOSUB 32 
:GOSUB 330 :GOSUB 350 :GGTO 250 



420 PRINT "THE START, R IS THE INTEREST 

RATE IN PERCENT FOR" 
430 PRINT "EACH PERIOD, AND N IS THE NU 

MBER OF PERIODS." 
440 PRINT: PRINT 
450 INPUT "WHICH VALUE IS UNKNOWN (ENTE 

R S,P,R OR N) ";U$ 
460 IF U$="S" THEN GOSUB 310 :GOSUB 32 

:GOSUB 330 :GOSUB 510 :GGTO250 

470 IF U$="P" THEN GOSUB 550 :GOSUB 32 
: GOSUB 330 : GOSUB 520 :GGTO250 

480 IF U$="R" THEN GOSUB 550 :GOSUB 32 
:GOSUB 310 jGOSUB 530 :GOTO250 



220 IF U$="N" THEN GOSUB 380 :GOSUB 31 
:GOSUB 330 :GOSUB 360 :GOTO 250 

230 IF U$="R" THEN GOSUB 380 : GOSUB 31 
-.GOSUB 320 :GOSUB 370 -.GOTO 250 

240 GOTO190 

250 CLS:PRINT "INTEREST (i) : ";:IF 1=0 
THEN PRINT USING "$$### #.##";S-P ELS 

E PRINT USING "$$###*.##"; I 
260 PRINT"PRINCIPAL (P): "; USING "$$### 

#.##";P:IF S=0 THEN S=P 
270 PRINT "PRINCIPAL PLUS INTEREST: ";U 

SING "$$####.##"; I+S 
280 PRINT"PERIODS (N) : ";USING "##.# 

";N 
290 PRINT"RATE (R) : "; USING "##.# 

###";R*100;:PRINT " %" 
300 PRINT: PRINT: INPUT "ENTER TO RETURN 

TO INDEX";I:RUN 
310 INPUT "ENTER THE PRINCIPAL (P)t";Ps 

RETURN 
320 INPUT "ENTER # OF PERIODS (N):";N: 

RETURN 
330 INPUT "ENTER INTEREST RATE PER PERI 

OD (R), IN PERCENT: ";R:R=R/l00: RETURN 

340 I=P*N*R: RETURN 
350 P=l/(N*R): RETURN 
360 N=l/(P*R): RETURN 
370 R=I/(P*N): RETURN 

380 INPUT "AMOUNT OF INTEREST (I):";I:R 
ETURN 

390 PRINT "COMPOUND INTEREST: S=P*(l+R/ 
100) "N, WHERE S IS THE TOTAL" 

400 PRINT "AMOUNT DUE IF THE INTEREST B 
ECOMES PRINCIPAL AT THE" 

410 PRINT "END OF EACH PERIOD, P IS THE 
PRINCIPAL AMOUNT AT" 



490 IF U$="N" THEN GOSUB 550 :GOSUB 31 
:GOSUB,330 :GOSUB 540 :GOTO250 

500 GOTO450 

5 10 S=P* ( ( 1+R) ~N) : I=S-P : RETURN 

520 P=S/((1+R)*N): RETURN 

530 R=((S/P)~(l/N))-l:RETURN 

540 ^(LOG(S)-LOG(P))/LOG(l+R):RETURN 

550 INPUT "TOTAL, INTEREST PLUS PRINCIP 

AL : ";S:RETURN 
560 PRINT "DEBT PAYMENTS": PRINT: PRINT 
570 PRINT "P=B(R(1+R)"N)/((1+R)"N-1), W 

HERE P IS THE PAYMENT TO" 
580 PRINT "BE MADE EACH PERIOD ON THE B 

ALANCE (B), IF THE INTEREST" 
590 PRINT "RATE R (ACTUALLY R%/1200) IS 

PAID FOR EACH PERIOD." 
600 PRINT "THE PROGRAM ASSUMES AN ANNUA 

L PERCENTAGE RATE AND" 
610 PRINT "MONTHLY PAYMENTS SO ENTER DA 

TA AS SUCH." 
620 PRINT: PRINT: INPUT "WHICH VALUE IS U 

NKNOWN (ENTER P,B,R OR N) ";U$ 
630 IF U$="P"THEN GOSUB 740 :GOSUB 750 
:GOSUB 770 :GOSUB 780 :GOTO 680 

640 IF U$="B" THEN GOSUB 740 :GOSUB 75 
:GOSUB 760 :GOSUB 790 :GOTO 680 

650 IF U$="R" THEN GOSUB 750 :GOSUB 76 
: GOSUB 770 : PRINT: PRINT"FINDING M 
AXIMUM QUARTER PERCENT. . .":GOSUB 800 
:GOTO 680 

660 IF U$="N" THEN GOSUB 740 :GOSUB 76 
:GOSUB 770 iPRINT "CONDUCTING COM 
PUTATION TO. FIND MAXIMUM N":IF P<R*BT 
HEN PRINT"PAYMENT MUST EXCEED"; R*B:GO 
TO 660 ELSE N=INT(B/P)-1: GOSUB 820 
:GGTO 680 

670 GOTO 620 
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This Grizzly Looking 

Character Is Losing 

The Bug Battle! 



TOO BAD! He continues to "WHIP" those miserable varmits the 
hard way . . . while the real answer is at his fingertips. He's not 
alone either! BUGS are an inevitable part of programming, and if 
you have ever tried to program in Assembly/Machine Language, 
you know exactly what we are talking about. 

When we purchased our first TRS-80", we were no strangers to 
machine language programming. We tossed out BASIC the first 
day, preferring to get right down to the nuts and bolts of things. 
What a shock! The Debugging Aids at the machine level were 
horrible! They were awkward to read, did not provide enough, or 
the right kinds of information, and required eight hands and 
gymnastic ability to switch from one command to another. 
Ridiculous! 

WE DIONT SUFFER LONG! 

Our first project was to create a truly powerful Debugging Tool. 
We called it BUGOUT. ran some advertisements, and sold a 
bundle of them. You know, the American dream come true. But 
that wasn't the end of our quest for a truly superior product. We 
asked every BUGOUT customer to give us their best ideas. Ideas 
that would make our product far superior to any other Debugger, 
and believe us, some of our customers are absolutely brilliant! 

We received a truck-load of fantastic ideas, and you guessed it, 
we overhauled the original BUGOUT and created the most 
powerful, versatile, and easy to use Machine Language Debugger 
ever written for Mod I or III computers. . . BAR NONE! 

HERE IT COMES 

Our new Debugger is called BUGOUT/PRO. It is 11. 5K of 
extremely powerful coding, and it is simply loaded with marvelous 
options waiting to come to the aid of beginner and expert alike. 
Anyone who is even remotely involved with Assembly/Machine 
Language programming can use BUGOUT/PRO. It comes with 
two manuals, one for beginners, with an INTERACTIVE course 
of instruction, and one for experts, with all the advanced features 
clearly spelled out. 

WHAT DOES IT DO? 

BUGOUT/PRO does all the things you would expect a Debugger 
to do, and more ... a lot more! Beyond that, and even more 
important than what it does, is how it does it, how the data is 
displayed, and how easy it is to use! 



You must EXPERIENCE the fast, flicker-free display, the utter 
simplicity of operation, and the huge variety of commands to 
make a fair appraisal of this product. No advertisement could 
possibly tell it all so we are saving the best features for our 
RISK-FREE home examination. 

RISK-FREE EXAMINATION 

That's right, you can examine BUGOUT/PRO in your own home 
or office with our 100% guarantee of satisfaction. If BUGOUT/PRO 
doesn't live up to your expectations, simply return it tor a full 
refund. What could be more fair? 

BUGOUT/PRO sells for $69.95 and is worth every penny we ask, 
and more! Just think of all the hours you've wasted searching 
for bugs. BUGOUT/PRO will make Assembly/Machine Language 
programming faster, easier, and far more enjoyable. Beginner or 
expert, BUGOUT/PRO is the Cadillac, Lincoln, and Rolls Royce 
of Debuggers rolled into one. 

WILL THE BUGS WIN? 

When you own BUGOUT/PRO, you are on the road to winning 
the bug battle. BUGOUT/PRO is supplied on TAPE or DISK, and 
either version automatically runs on both Mod I and Mod III 
computers. TAPE and DISK versions are identical, but be sure to 
specify which one you want. We accept Master Charge, Visa, 
Money Order, or Personal Checks. Foreign Orders and C.O.D.'s 
are $5.00 extra. Washington state residents add 5.3% sales tax. 

Take advantage of our RISK-FREE offer today. BUGOUT/PRO is 
a must investment for all machine language programmers. 

German Language Edition available in Europe from Hanspeter 
Schmid, Lenaustr. 2, 6906 Leimen, W. Germany. 
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Financial program 

680 CLS: PRINT "MONTHLY PAYMENTS OF : " 

; USING "$$####. ##";P: IF PX<>0.0 THEN 

PRINT "ACTUAL PAYMENT BASED ON CALCUL 

ATIONS IS : ";USING "$$####. ##";PX 
690 PRINT "TO PAYOFF A EALANCE OF :";US 

ING "$$####. ##";B 
700 PRINT "IN ";N; "MONTHS WITH AN ANNUA 

L RATE OF ";USING "##.##";R*1200;.:PRI 

NT "%" 
710 PX=P 
720 PRINT: PRINT "TOTAL ACTUAL INTEREST 

(P*N-B): ";USING "$$####.##";PX*N-B 
730 PRINT: PRINT: INPUT "ENTER TO RETURN 

TO INDEX"; I: RUN 
740 INPUT "WHAT IS ANNUAL INTEREST RATE 

IN PERCENT (R)";R:R=R/1200: RETURN 
750 INPUT "HOW MANY MONTHS ARE PAYMENTS 

TO BE MADE (N) ";N:RETURN 
760 INPUT "WHAT IS THE MONTHLY PAYMENT 

(P) ";P: RETURN 
770 INPUT "WHAT IS THE CURRENT BALANCE 

(B) ";B:IF B<P THEN PRINT "BALANCE MU 

ST BE MORE THAN PAYMENT ...": FOR W=l T 

O 1000:NEXT W:CLS:GOTO 560 ELSE RETU 

RN 
780 P=B* (R* (1+R) *N)/( ( (1+R) ~N) -1 ) : RETUR 

N 
790 B=P*(((1+R)*N)-1)/(R*((1+R)*N)):RET 

URN 
800 R=R+. 0025/12 :GOSUB 840 
810 IF (P-PX)<=0.0 THEN RETURN ELSE GOT 

O 800 
820 N=N+1:GOSUB840 
830 IF (P-PX)>=0.0 THEN RETURN ELSE GOT 

O 820 
840 PX=B*(R* (1+R) *N)/( ( (1+R) *N)-1) :RETU 

RN 
850 CLS: PRINT "SAVINGS ACCUMULATIONS" 
860 PRINT: PRINT: PRINT "IF A MONTHLY PAY 

MENT (P) IS MADE TO A SAVINGS ACCOUNT 

II 
9 

870 PRINT "THE INTEREST IS COMPOUNDED E 

VERY N MONTHS, AND THE " 
880 PRINT "MONTHLY PAYMENTS INTO THE AC 

COUNT ARE INCREASED BY AN" 
890 PRINT "AMOUNT 'THAT REPRESENTS THE A 

NNUAL RATE OF INFLATION," 
900 PRINT "A REALISTIC FORECAST CAN BE 

MADE AS TO THE ACTUAL" 
910 PRINT "ACCUMULATION OF MONEY IN THE 

ACOUNT, EXCEPT FOR TAXES" 
920 PRINT "(WHICH YOU CAN, PERHAPS, EST 

IMATE)." 
930 PRINT: PRINT: INPUT "AMOUNT OF INITIA 

L MONTHLY PAYMENT (FIRST 12 MONTHS)"; 

P 
940 LPRINT "INITIAL PAYMENT : "; USING " 

$$####.##";P; 
52 80-U.S. Journal 



950 INPUT "HOW MANY MONTHS BETWEEN COMP 
OUNDING ";N:IF (N<>1)AND(N<>2)AND(N<> 
3)AND(N<>4)AND(N<>6)AM)(N<>12)THEN PR 
INT "MUST USE 1,2,3,4,6, OR 12":GOT09 
50 

960 LPRINT " COMPOUNDED AT" ;N; "MONTH IN 
TERVALS" 

970 INPUT "PERCENTAGE INTEREST FOR COMP 
OUNDING (SIMPLE ANNUAL RATE)";R 

980 LPRINT "AT AN ANNUAL RATE OF";R;"PE 
RCENT. "; 

990 INPUT "AVERAGE ANNUAL INFLATION RAT 
E FOR PAYMENTS"; I 

1000 LPRINT "PAYMENTS ARE INCREASED ANN 

UALLY AT"; I ; "PERCENT "; 
1010 INPUT "NUMBER OF YEARS ALLOWED TO 

ACCUMULATE" ;Y 
1020 LPRINT "FOR" ;Y; "YEARS."; 
1030 INPUT "AVERAGE ANNUAL TAX RATE EXP 

ECTED, PERCENT: ";TP 
1040 LPRINT " WE EXPECT AN AVERAGE TAX 

RATE OF" ;TP; "PERCENT ANNUALLY." 
1050 FOR YT=1 TO Y 
1060 FOR AN=1T0(12/N) 
1070 FOR CN=1 TO N 
1080 ST=P+ST:IG=IC+ST 
1090 M=M+1 
1100 PRINT "MONTH: ";M;" YEAR: "; USING " 

##.##";M/12;:PRINT " PAYMENTS: ";USI 

NG "$$####. ##";P;:PRINT" TOTAL: ";U 

SING "$$####.##"; ST 
1110 NEXT CN 

1120 AS=IC/N:XT=R*AS*N/1200:IC=0 
1130 PRINT "INTEREST PAYMENT : "; USING 

"$$####. ##";XT 
1140 TM=TM+XT:TI=TI+XT 
1150 ST=ST+XT 
1160 NEXT AN 

1170 LPRINT "YEAR: ";YT;" PAYMENTS: 
".-USING "$$#####. ##";P;:LPRINT " 
TOTAL SAVINGS: ";USING "$$#####.##"; 

ST 
1180 P=P+I*P/100 
1190 TX=q , P*TM/l00:LPRINT"MINUS ANNUAL T 

AX = ";USING "$$####. ##";TX; 
1200 LPRINT " NET SAVINGS: "; USING "$$ 

#####. ##";ST-TX 
1210 LPRINT " " 
1220 PRINT "ANNUAL TAX :";USING "$$#### 

.##";TX 
1230 TM^:TT^^T+TX:ST=ST-TX:PRINTTT 
1240 NEXT YT 

1250 PRINT: PRINT: PRINT "FINAL AMOUNT IS 
";USING "$$#######.## M ;ST 



1260 LPRINT 



': LPRINT 



': LPRINT "FI 



NAL AMOUNT IS : ";USING "$$######.##" 
;ST 
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1270 PRINT "TOTAL INTEREST RECEIVED :"; 

USING "$$### #.##";TI 
1280 LPRINT "TOTAL INTEREST RECEIVED : 

"; USING "$$####.##";TI; 
1290 PRINT "TOTAL TAXES PAID: "; USING " 

$$####. ##";TT 
1300 LPRINT " TOTAL TAXES PAID : ";US 

ING "$$####.##";TT 
1310 PRINT: PRINT: INPUT "ENTER TO RETURN 

TO INDEX ";I:RUN 
1320 PRINT "ANNUITIES : FINDING THE PR 

ESENT V*)RTH (VALUE) OF" 
1330 PRINT "AND ANNUITY OF Y YEARS PAYI 

NG P AMOUNT EVERY YEAR, 
1340 PRINT "WITH AN ANNUAL NOMINAL INTE 

REST, R." 
1350 PRINT:PRINT 
1360 PRINT "W=P*((1+R)*Y-1)/(R(1+R)"N)" 

1370 PRINT: PRINT 

1380 INPUT "HOW MANY YEARS" ;N 

1390 INPUT "HOW MUCH IS TO BE PAID EVER 

Y YEAR";P 
1400 INPUT "WHAT IS THE ANNUAL NOMINAL 

INTEREST IN PERCENT" ;R:R=R/l00 
1410 GOSUB 790 



1420 PRINT "THE PRESENT WORTH IS ";USIN 

G "$$####.##";B 
1430 PRINT: PRINT 
1440 INPUT "ENTER TO RETURN TO INDEX" ;R 

:RUN 
1450 PRINT "TO MAKE A CERTAIN AMOUNT AV 

AILABLE FOREVER,. AN" 
1460 PRINT " AMOUNT OF CAPITAL MUST BE 

INVESTED AT" 
1470 PRINT "AN INTEREST RATE, R, SUCH T 

HAT INTEREST = SPENDING ." 
1480 PRINT: PRINT 
1490 PRINT "THE PRESENT WORTH OF A PERP 

ETUrTY HAVING PAYMENTS P" 
1500 PRINT "IS P/(R/100)." 
1510 PRINT:PRINT 
1520 INPUT "WHAT IS THE PAYMENT AMOUNT" 

1530 INPUT "WHAT IS THE NOMINAL ANNUAL 

INTEREST RATE IN PERCENT"; R 
1540 W=P*100/R 
1550 PRINT: PRINT: PRINT "AN INVESTMENT O 

F";USING "$$####. ##";W;:PRINT" IS REQ 

UIRED." 
1560 PRINT i PRINT: INPUT "ENTER TO RETURN 
TO INDEX" ;R: RUN ■ 



TRS-80 OWNERS 
~ REJOICE! 



Our professional quality software 
development tools let you program 
your TRS-80 with more ease and 
power than you ever imagined possi- 
ble. Programming will become a 
pleasure when you use our full 
screen editors. These editors are not 
just patched up word processors. 
They have been specially designed to 
enhance the BASIC and ASSEMBLER 
programming languages. Our 
assemblers provide full screen option 
menus to relieve you of the burden of 
remembering command names. Com- 
bine user oriented features like this 
with the finest and most extensive 
documentation in the industry and 
you will see why programming a 
TRS-80 is now better than ever. 



T-ZAL: TAPE BASED ASSEMBLER: Assem- 
ble lo memory or! tape. Create relocatable 
SYSTEM tapes! Includes relocating LOADER 
pgm. 8 character symbols with XREF. 
Upgrades to disk when you do! 
Mod 3 Cat # 1250-20 S 49.95 

FULL SCREEN PROGRAM TEXT EDITORS: 

All CAU full screen editors support four way 
. cursor motion and scrolling with user selec- 
table auto repeat|and scroll speeds. Totally 
visual character insert, delete, and change. 
Block move, copf delete. Global find and 
change. Editor fdr BASIC also provides 
automatic line renumbering and 26 user- 
definable macro keys. 
For Tape and Disk BASIC: 
Mod 1 Cat # 1010-20 $24.95 
Mod 3 Cat # 1210-20 S29.95 
For Mod 1 EDTASM source files: 
Tape Cat # 1010-30 $24.95 
Disk Cat # 10i0-31 S34.95 
(Disk version shipped on tape ) 



M-ZAL: DISK EDITOR/ASSEMBLER: 

Modular Assembler Language development 
system includes full screen text editor, multi- 
pass assembler, and object module linker. 
Allows 8 character symbols and source file 
chaining/nesting with 'INCLUDE cmd. Full 
support for relocation and global symbols. 
Symbol table with cross reference. Req. 32K 
Disk system. 

Mod 1 Cat # 1050-10 SU9.00 
Mod 3 Cat # 1250-10 $149.00 

XBUG: DEBUGGING TOOL & MONITOR: 

Display/ Modify memory and regs. Set up to 
10 invisible and transparent breakpoints. 
Multi-speed single step. Load/Copy/Create 
SYSTEM tapes. Uses only 2.5K and can be 
dynamically relocated to any address. 
Mod 1 Cat # 1020-10 S19.95 
Mod 3 Cat n 1220-10 S19.95 



Note: these products are not available for 
level 1 machines. 

When ordering specify Model, RAM size, # of 
disks. 

Send check, money order, or MC/VISA 
numbers and expiration date to: 
Computer Applications Unlimited 
P.O. Box 214, Dept. EEW 
Rye, New York 10580 

NY. State residents add applicable sales tax. 



aler Inquiries Invited. 

ni I COMPUTER 
JLI APPLICATIONS 
L(7,m UNLIMITED tm 



Quality •Reliability* Service 
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Machine language application. 



Screen printing 
with MX-80 

Dump alphanumerics and 
graphics to the printer 



Model I/HI, 16K and up 



Ron Goodman, North Hollywood, CA 



The big computer systems are 
blessed with a wonderful button. It 
is off to the side of the keyboard, and 
is called the "screen print" button. 
Its function is to print the entire 
screen onto a printer so that you can 
have a hard copy. 

The TRS-80 doesn't have such a 
button. Besides, many printers 
don't print the graphics that might 
be on the screen of a TRS-80. The 
most popular TRS-80 printer, the 
Epson MX-80, can print the 
graphics that are on the TRS-80s 
screen. By using the program 
presented here with an MX-80, you 
can have the advantage of a screen 
print button. 

When Can the Program Work? 

Just about any time that the 
BREAK key returns you to the 
READY mode, this program will 
work. If you are in the READY 
mode, it will work. It will work while 
running most BASIC programs. 
(Exceptions to this are BASIC 
programs that disable the BREAK 
key.) It can work during an INPUT 



command, in the SYSTEM mode, or 
at any time during the running of a 
program. 

Few assembly language 
programs will allow this program to 
work. Putting a CALL 16396 or 
CALL START (where START = the 
starting address of the screen print 
routine) in the main driver of an 
assembly language program, 
will, in many cases, enable the 
screen print key. 

Enter the program from Editor 
Assembler or from TBUG, and 
create a system tape. The program is 
located directly over the disk 
command area. If you have disk 
capability, you will have to use an 
editor assembler and change the 
value in line 180 to a high address. 
Change it to 7FB9H for 16K, BFB9H 
for 32K, or FFB9H for 48K. You 
must also set memory size to 32696 
for 16K, 49080 for 32K, or 65465 for 
48K. 

When the program is loaded, the 
screen print key is automatically 
active. Press the SHIFT key and the 



BREAK key. If your printer was 
ready, whatever is on your screen 
will soon be on paper from your 
printer. If it wasn't ready, don't 
worry. The screen print program 
will be in a loop until your printer is 
ready. If, while printing, you decide 
to stop the printout, just press 
ENTER and control will be returned 
to BASIC. 

This program should work for 
other printers, but unless the 
printer's graphics codes are like 
those on the EPSON MX-80, 
graphics won't turn out. On the MX- 
80, the graphics codes are different 
from TRS-80's codes. A code can be 
converted by adding 32 to the TRS- 
80 code. This program handles that 
automatically. 

Notice that cassette users don't 
need to answer the memory size 
question. This is because the 
program resides in memory that is 
normally not used. In a sense, this 
program does not require any 
memory. At least, you will not miss 
the memory that it does use. 
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TURN YOUR COMPUTER INTO 
A GRAPHICS MACHINE 




WITH THE MIKEEANGELO 
GRAPHIC SYSTEM!! 

MIKEEANGELO is a hardware/software 
system designed for the TRS-80 model I & 
III computers. When installed, your 80 will 
come alive with graphic ability!! 

If you've been waiting for a graphic 
system with the best dots/dollars ratio, 
take a look at our MIKEEANGELO. » 




HARDWARE 



TOTAL SCREEN INVERSE VIDEO 
TWO MODES OF DENSITY: 

384 x 192 or 191 x 192 for Model I 

512 x 192 or 256 x 192 for Model III 
EVERY DOT CAN BE SET, RESET or TESTED 
12288 BYTES OF FAST 200 ns MEMORY 
FUNCTIONS SELECTED BY OUTPUT PORT #254. 
MEMORY MAPPED FOR SPEED 
OCCUPIES LAST 16K BLOCK OF MEMORY 
CAN BE USED AS NORMAL MEMORY 

(if you have 32K or more of memory) 
COLOR COORDINATED ENCLOSURE 
DOES NOT CONFLICT WITH DISK OR CASSETTE I/O 

SELF SWITCHING POWER SUPPLY 

(Powers up with Computer) 
COMES WITH IT'S OWN WALL TRANSFORMER 
NOT A CHARACTER GENERATOR!! 
EASY INSTALLATION 

(Requires only 18 solder connections and 

one trace/pin cut) 



SOFTWARE 

• COMES WITH SAMPLE AND DRIVER SOFTWARE 

• USABLE THROUGH BASIC OR MACHINE LANGUAGE 

• EXCELLENT INSTALLATION/ 
OPERATION MANUAL 

TOOL KITS AVAILABLE FOR JUST $15.00 

MANUAL AVAILABLE SEPARATELY FOR $15.00 
Full price of manual will be deducted from the 
Purchase Price of MIKEEANGELO when ordered. 

PREPAID, COD, MASTERCHARGE, VISA, or MASTER- 
CARD ORDERS ACCEPTED. FOB: Bellevue, Wa. 

U.S. Currency ONLY. Stock to 30 days delivery. 

DEALERS INQUIRIES INVITED. 

ORDER NOW FOR ONLY $369. 

Complete with power supply, case software and manual. 



MIKEE ELECTRONICS CORPORATION 



"1 MIKEEANGELO is a trademark (or Mikee Electronics Corp. 

"2 TRS-80 is a trademark for the Tandy Corp. 

*3 Opening your TRS-80 will void the limited warranty. 

*4 90 day warranty, full refund or replacement. 



P.O. Box 3813 Bellevue, Washington 98009 
Telephone 206/451-0574 

WRITE for FREE BROCHURE or call for more information 
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Program Listing for 
Screen Printing with MX-80 





00100 


; THIS 


ROUTINE 


PROVIDES A SCREEN 


PRINT BUTTON. 




00110 


; BY PRESSING ' 


CHE SHIFT KEY AND THE BREAK KEY, 




00120 


; THIS 


ROUTINE WILL PRINT THE CONTENTS OF THE 




00130 


; SCREEN ONTO AN EPSON MX-80 PRINTER. THIS 




00140 


; SHOULD WORK ON MOST OTHER PRINTERS, AS LONG AS 




00150 


• THERE ARE NO GRAPHICS ON THE SCREEN. 


400C 


00160 




ORG 


16396 


; BREAK ENTRY POINT 


400C C35241 


00170 




JP 


START 


• CALL ROUTINE 


4152 


00180 




ORG 


4152H 


f START OF SCREEN-PRINT 


4152 3A8038 


00190 


START 


LD 


A, (14464) 


' GET BYTE FOR SHIFT KEY 


4155 B7 


00200 




OR 


A 


', CHECK FOR ZERO 


4156 2002 


00210 




JR 


NZ,BEG 


•PRINT SCREEN IF <>0 


4158 3C 


00220 




INC 


A 


f RESTORE A REGISTER 


4159 C9 


00230 




RET 




•RETURN CONTROL TO RDM 


415A E5 


00240 


BEG 


PUSH 


HL 


? SAVE HL 


41 5B D5 


00250 




PUSH 


DE ; 


• SAVE DE 


415C CS 


00260 




PUSH 


BC 


r SAVE BC 


415D 21E837 


00270 




LD 


HL, 14312 j 


• LINE PRINTER ADDRESS 


4160 CD8C41 


00280 




CALL 


READY 


? WAIT FOR PRINTER 


4163 360F 


00290 




LD 


(HL),15 


• SEND TO PRINTER 


4165 0610 


00300 




LD 


B,16 


? # LINES ON SCREEN 


4167 11003C 


00310 




LD 


DE, 15360 


• START ADDRESS OF SCREEN 


416A CD8C41 


00320 


L00P2 


CALL 


READY 


; WAIT FOR PRINTER 


416D 360E 


00330 




LD 


(HL),14 


• EXPANDED CHARACTER CODE 


416F 0E40 


00340 




LD 


C,64 


r CHARACTERS PER LINE 


4171 CD8C41 


00350 LCOP1 


CALL 


READY 


• WAIT FOR PRINTER 


4174 1A 


00360 




LD 


A,(DE) 


? GET BYTE OFF SCREEN 


4175 CB7F 


00370 




BIT 


7,A j 


CHECK IF GRAPHICS 


4177 2802 


00380 




JR 


Z,NOGRFC 


r GO ON IF NOT GRAPHICS 


4179 0620 


00390 




ADD 


A, 32 ; 


CONVERT CHR$ TO MX-80 


417B 77 


00400 


NOGRFC 


LD 


(HL),A 


? SEND TO PRINTER 


41 7C 13 


00410 




INC 


DE ; 


• NEXT SCREEN POSITION 


417D 0D 


00420 




DEC 


C 


• DEC CHR/LINE COUNT 


41 7E 20F1 


00430 




JR 


NZ,L00P1 ; 


NEXT CHR IF NOT ENDLINE 


4180 CD8C41 


00440 




CALL 


READY 


• WAIT FOR PRINTER 


4183 360D 


00450 




LD 


(HL),13 j 


TELL PRINTER TO DO LINE 


4185 10E3 


00460 




DJNZ 


L0OP2 


• PRINT NEXT LINE IF MORE 


4187 CI 


00470 


BASIC 


POP 


BC ; 


RESTORE BC 


4188 Dl 


00480 




POP 


DE 


• RESTORE DE 


4189 El 


00490 




POP 


HL j 


RESTORE HL 


418A AF 


00500 




XOR 


A 


• CANCEL BREAK KEY 


418B C9 


00510 




RET 




PASS CONTROL BACK TO ROM 




00520 


; ROUTINE TO CHECK WHETHER PRINTI 


2R IS READY OR NOT. THE 




00530 


; LEFTMOST BIT 


OF THE CONTENTS 01 


n 14312 EQUALS 1 IF NOT 




00540 


; READY, AND 


IF THE PRINTER IS 


READY. 


418C CB7E 


00550 


READY 


BIT 


7,(HL) j 


CHECK BIT STATUS 


418E OS 


00560 




RET 


Z 


• PRINTER READY, RETURN 


418F 3A4038 


00570 




LD 


A, (14400) ; 


TAKE ENTER KEY STATUS 


41$2 FE01 


00580 




CP 


1 


• IS ENTER BEING PRESSED? 


4194 20F6 


00590 




JR 


NZ, READY ; 


IF NOT THEN LOOP 


4196 CI 


00600 




POP 


BC 


• THEN REMOVE CALL ADDRESS 


4197 18EE 


00610 




JR 


BASIC 




0000 


00620 




END 






00000 TOTAL 


ERRORS 








■ 
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Only the Fast Survive! 




625D Middlebelt • Garden City, Ml 48135 • 800-521-6504/(313) 425-40S0 



Written by Larry Ashmun 

Copyright 1982 Soft Sector Marketing, Inc. 

Prices per Game: TRS-80 16K Level II Mod I/Mod III Cassette $15.95 

TRS-80 32K Level II Mod I/Mod III Diskette $19.95 

10% discount for 2 items, 15% for 3 or more. Please add $2.50 per order for postage & handling, 
Michigan residents add 4% sales tax. Outside USA (except Canada) please add $10.00 per order for 
postage & handling. 



Sound effects are playable through the cassette 
AUX plug High scores are automatically saved 
after each game on disk versions. 
Call or write for our complete catalog. 



The Scott Adams 
Adventure Series 

AN OVERVIEW 



A 



iv 




I stood at the bottom of a deep chasm. CooJ air 
sliding down the sides of the crevasse hit waves of heat 
rising from a stream of bubbling Java and /ormed a mist 
over the sluggish flow. Through the swirling clouds I 
caught glimpses of two ledges high above me: one was 
bricked, the other appeared to lead to the throne room 
j I had been seeking. 

A blast of fresh air cleared the mist near my feet 
I and like a single gravestone a broken sign appeared 
momentarily. A dull gleam of gold showed at the base 
of the sign before being swallowed up by the fog again. 
From the distance came the angry buzz 0/ the killer 
bees. Could I avoid their lethal stings as I had managed 
to escape the wrath 0/ the dragon? Reading the sign 
might give me a clue to the dangers of this pit. 

I approached the sign slowly. 

And so it goes, hour after hour, as you guide your 
microcomputer through the Adventures of Scott 
Adams in an effort to amass treasures within the 
worlds of his imagination. 

By definition, an adventure is a dangerous or 
risky undertaking; a novel, exciting, or otherwise 
remarkable event or experience. On your personal 
computer. Adventure is that and more. 

For the user, playing Adventure is a dangerous or 
risky undertaking in that you better be prepared to 
spend many addictive hours at the keyboard. If you 
like challenges, surprises, humor and being 
transported to other worlds, these are the games for 
you. If you dislike being forced to use your common 
sense and imagination, or you frustrate easily, try 
them anyway. 

In beginning any Adventure, you will find yourself 
in a specific location: a forest, on board a small 
spaceship, outside a fun house, in the briefing room of 
a nuclear plant, in a desert, etc. 

By using two-word commands you move from loca- 
tion to location, manipulate objects that you find in the 
different places, and perform actions as if you were 
really there. The object of a game is to amass treasure 
for points or accomplish some other goal. Successfully 
completing a game, however, is far easier to state than 
achieve. In many cases you will find a treasure but be 
unable to take it until you are carrying the right com- 
bination of objects you find in the various locations. 

How do you know which objects you need? Trial 
and error, logic and imagination. Each time you try 
some action, you learn a little more about the game. 
Which brings us to the term "game" again. While call- 
ed games. Adventures are actually puzzles because 
you have to discover which way the pieces (actions, 
manipulations, use of magic words, etc.) fit together in 
order to gather your treasures or accomplish the mis- 
sion. Like a puzzle, there are a number of ways to fit 
the pieces together; players who have found and 
stored all the treasures (there are 13) of Adventure #1 
may have done so in different ways. 

In finding how the pieces fit, you will be forced to 
deal with unexpected events, apparent dead ends and 
Scott's humor, which is one of the best parts of the 
puzzles. 

If you run into a barrier like not being able to 
discover more rooms, don't give up. Play the game with 
some friends; sometimes they'll think of things you 
haven't tried. 

While I pondered how to reach the throne room — 
which I was sure contained the treasures of Croesus — 
the fog grew thicker and the hours passed. I realized I 
would not be able to outwit Adams today.. .but maybe 
tomorrow. I marked my present location on my tattered 
map and began the long trip to the surface. As I drag- 
ged myself off to bed, I thought about other possible 
Adventures. 

But enough for tonight. Tomorrow — another 
crack at the chasm. —by Ken Mazur 

Reprinted with permission from 
PERSONAL COMPUTING MAGAZINE, FEB. 1980 

Copyright 1980 PERSONAL COMPUTING MAGAZINE 
1050 Commonwealth Ave., Boston. Moss. 02215 



The 12 Scott Adams Adventures 

Adventureland • Pirate Adventure • Mission Impossible 
Voodoo Castle • The Count • Strange Odyssey • Mystery 
Fun House • Pyramid of Doom • Ghost Town • Savage 
Island-Part 1 • Savage Island-Part 2 • Golden Voyage 



WHO HUB YOU THIS TIME? 



/m\ 






<» 






iii'thie seeker of lost treasures in an enchanted 
realm of magical beings? Perhaps you:re an 
astronaut, thousands of light years from 
earth, searching the galaxy's rim for 
the fabulous treasures and ad- 
vanced technologies of a 
long-dead civilization. Maybe 
you're the plunderer of 
ancient pyramids in a 
maddeningly dangerous 
land of crumbling ruins, 
and trackless desert 
wastes. 



Jl- 
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You wish to soar to 

other worlds, to behold 

wonders never beheld 

by mortal eyes, to dream 

unrestrained to the 

furthest limits of your 

imagination. 



EGDQGEEk 

The ADVENTURE SERIES 

by Scott Adams has been 

reviewed by every major 

microcomputing magazine, 

receiving only the highest 

praise for its mind-puzzling 

challenge & refreshing originality. 

Tens of thousands of adults and 

children have matched wits with 

the Adventure Master. Now, it's your 

turn. If you crave the challenge and 

panorama of the exotic, touched with 

sparkling humor, then the Adventure Series is for you. 
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jX$Adventut& 

\ ,(F^ INTERNATIONAL 



BOX 3435. LONGWOOD FL 32750 

(305) 862-6917 (QUESTIONS) 

ORDER FROM YOUR FAVORITE DEALER 

oi CALL TOLL FREE (800) 327-7172 

(ORDERS ONLY PLEASE 
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SINGLE 
TAPE 


12 PACK 
TAPE 


SINGLE 

DISK 


TRIPLE 
DISK 


12 PACK 
DISK 


/ 


APPLE 


519.95 
24K 


$129.95t 
24 K 


$29.95' 
48K 


$69.95- 
48K 


" 


C 


ATARI 


$19.95 
24K 


$129.95t 
24K 


- 


$39.95 
40K 


$129.95t 
48K 




CP/M (Z-80) 


- 


- 


- 


_ 


$129,951 




TRS-80 
MOD 1&3 


$19.95 
16K 


$1 29.95 1 
16K 


- 


$39.95 
32K 


$129,951 
32K 




TRS-80 
MOD 2 


- 


- 


" 


" 


$129.95 












F 









Adventure Hint Book (All 12) $ 7.95 

Adventure Hint Sheet (Single) 1.00 

Commodore VIC (Cartridge) 39.95 I 

T.I. 99/4 (Tape or Disk) 29.95 

Requires Adventure Command Module I 

•Scott Adams' Graphic Adventure Series 
Apple Disks-Full Color Hi-Res Graphics. 
112 Adventure Hint Book Incl. 



Radio Shacks TRS-80® Color Computer 
Gives libu the Graphics Advantage! 



Radio Shack's TRS-80 is the pow- 
erful personal computer that 
makes sophisticated color graph- 
ics affordable! With our all-new 
accessories, you can create a com- 
plete graphics system that's ideal 
for use in business, education or 
engineering. 




NEW! TRS-80 Multi-Pen 
Plotter. This intelligent plotter 
produces hard copy printouts in 
six colors using simple ASCII com- 
mands. At only $1995, it's just 
what you need to produce attrac- 
tive, professional looking graphic 
displays. Add our felt-tip pens 
and you can plot on transparencies 
for chart overlays and overhead 
projection. Features include mul- 
tiple line styles, arcs, upper- and 
lower-case characters and symbols 
to enhance your graphics, plus our 
exclusive high-level graphic appli- 
cation package. This graphics 



I want graphic proof! 

Send me a free TRS-80 catalog. 

Radio Shack, Dept. 82-A-362 
1300 One Tandy Center 
Fort Worth, Texas 76102 



package lets anyone create line 
graphs, pie charts and bar charts 
for business or educational use — 
no experience is necessary! 

NEW! Dual-Purpose Printer. 

The new $399 TRS-80 Line 
Printer VII is a perfect 
low-cost choice for print- 
ing text — and its bit 
image mode lets you 
print superb dot address- 
able graphics in black 
and white! For word pro- 
cessing, data processing, 
and graphics, check out 
our new $799 Line 
Printer VIII. Our $4.95 
Cassette Screen Print Pro- 
gram makes it easy to 
transfer the two-color 
high-resolution display 
memory contents of your 
Color Computer to either 
of these printers. 

Price Breakthrough! At just 
$449, the new TRS-80 Digitizer 
is an economical and extremely 
convenient way to input your 
graphics. Measure areas, lengths, 
distances and more! And because 
it's not an ordinary graphics "pad," 
you can use it on maps, charts or 



plans of any size. A swivel head 
lets you operate vertically, too. In 
fact, you can even input data 
directly from the surface of your 
computer screen or light table. 

Great Graphics Made Easy! 

It all starts with our $599 TRS-80 
Color Computer. The 16K mem- 
ory and extended Color BASIC 
lets you draw circles, rectangles, 
and boxes with simple, one-line 
commands. And you can add up 
to four disk drives, with the first 
only $599! 



STREET . 
CITY 



_ZIP_ 






Vol II No 3 — May/Jun 79 

String Packing techniques exposed! 
Program to determine analytical or 
intuitive functions of the brain. 
How to win NIM-type games. 
Produce sound with your TRS-80. 

Vol II No 4 - Jul/Aug 79 

How to create fast graphics. 
Lifeboat — a game program. 
How to renew lost programs. 
A no-hardware lowercase mod. 

Vol II No 6 - Nov/Dec 79 

Function Grapher/Root finder 

program. 

A home heat loss program. 

A hydraulic piston calculation 

program. 

Restoring killed disk files. 

How to do fast sorts. 

Vol III No 3 - May/Jun 80 

Telecommunications with the TRS- 
80. 

Programming technique with 
BASIC game programs. 
Produce sound with BASIC 
programs. 



Vol III No 6 — Nov/Dec 80 

A simple payroll program. 
A digital plotter interface. 
A different maze program. 
How to produce keyboard type- 
ahead. 



There's a wealth of 

good information in these 

BACK ISSUES of 

The 80-U.S. Journal! 



Vol IV No 3 - May/Jun 81 

Line packing techniques. 
How to use "PRINT USING". 
Anaimation and the TRS-80. 
Space Marauder - a game program. 
A check writing program. 



Vol IV No 4 - Jul/Aug 81 

Descending lower case for Model I. 
Sundance a game for Mods I, HI and 
Color computer. 
A student timetable program. 
Easy tape loading for Model I. 



Vol IV No 5 - Sep/Oct 81 

Microcomputers in industry. 

Keyword search, a database 

program. 

Compute the Retail Installment 

contract. 

The vertical mill: a 3-D Plotter? 

Gameshow simulation - a game 

program. 



Vol IV No 6 - Nov/Dec 81 

A comparison shopper program. 

Program using only four BASIC 

statements. 

Scrabble on the TRS-80. 

Real time clock construction. 

Pocket Computer biorythms 

program. 

Supergraph math functions 

program. 



Vol V No 2 - Feb 82 

Word processing issue. 

An auto tape save program. 

A Tic Tac Toe game program. 

Make posters with your TRS-80. 

Hard disk evaluation. 

Double precision function routines. 

A voice actuated control for your 

TRS-80. 



Vol V No 3 - Mar 82 

Computers in medicine. 
QC in the medical lab. 
Get extra RAM cheap project. 
Color computer LINK function. 
Visible sorts on the screen. 
One-arm bandit program. 
Pinball baseball program. 
Modified HOST for Model II. 



Please send the following back issues postpaid: 



□ May/Jun 1979 

□ Jul/Aug 1979 

□ Nov/Dec 1979 

□ Feb 1982 

Name 



D May/Jun 1980 

□ Nov/Dec 1980 

□ May/Jun 1981 

□ Mar 1982 



□ Jul/Aug 1981 

□ Sep/Oct 1981 

□ Nov/Dec 1981 

Master/Visa accepted. 



Address 
City 



State_ 



.Zip 



Please remit $4.00 for each back issue ordered. 

Send this back issue order to: 80-U.S. Back Issues, 3838 South 
Warner Street, Tacoma, Washington 98409 



MACRO-MONITOR 
...THE SHADOW 




What secrets lurk deep 

within the heart of your 

microprocessor? Only THE 

SHADOW knows. Advanced 

Operating Systems shines the 

light on the intricate workings 

of your *TRS-80 Model I or 

Model III microcomputer. 

MACRO-MONITOR, THE 

SHADOW, is a machine 

language program by Jake 

Commander which allows you 

to disassemble and examine 

program instructions from any 

part of your computer's 

memory. THE SHADOW even 

enables you to single-step 

through your computer's ROM. 

With THE SHADOW, you can 

load a machine language 

program from disk or tape and 



begin execution at a user- 
specified breakpoint, one 
instruction at a time, with a 
user-defined time delay 
between instructions. It will 
disassemble each instruction as 
it is being executed and route 
it along with all current 
register values to your video 
screen or printer. The user may 
also search through memory 
for a specific character string 
(ASCII or Hex) up to 16 bytes 
in length. 
THE SHADOW permits machine 
language programs to be 
relocated within memory with 
all internal calls and jumps 
changed to execute in the new 
location. The program also 
provides a visual display of 
tape LOADS and SAVES. 



THE SHADOW is completely 

user-relocatable in RAM 

making it an extremely 

valuable tool for all 

programmers. 

Now available at your local 

software retailer, or call (800) 

348-8558 to order. (Indiana 

residents, call (219) 879-4693) 

MasterCard and VISA accepted. 

MODEL I TAPE $54.95 

MODEL I DISK $59.95 

MODEL III DISK $69.95 

ADVANCED 

OPERATING 

SYSTEMS 

450 St. John Road 
Michigan City, IN 46360 
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TRS-80 is a registered trademark of Radio Shack, a division of Tandy Corp. 





WE ARE NOW NUMBER 1 

OUR MASSIVE VOLUME HAS ALLOWED US TO REDUCE OUR 

PRICE TO JUST 

$10000 

^^^_ ^^ REDUCED FRO 



FROM 16909 



FOR THE POWERFUL 
LDOS 5.1 OPERATING SYSTEM. 



The Ultimate In 
Operating Systems 
For Model I & III 



* Model I LDOS provided on 35 track single density media. 

* Model III LDOS provided on 40 track double density media. 

* LDOS can be provided on special media configurations at an 
additional charge. 

* Prices & Specifications are subject to change without notice. 
+ Although not required, LSI recommends two or more drives 

when using LDOS. 



For Further Information Contact The Distributor Or Dealer Nearest You: 



(West) 

LOBO DRIVES INT'L 

354 S. Fairview Ave. 

Goleta.CA 93117 

(805) 683-1576 



(Central) 

GALACTIC SOFTWARE LTD. 

11520 N. Port Washington Rd. 

Mequon, Wl 53092 

(414) 241-8030 



(East) 
MISOSYS 

5904 Edgehill Dr. 

Alexandria, VA 22303 

(703) 960-2998 



(The Common Market) 
MOLIMERX LTD. 

1 Buckhurst Rd., Bexhill 
Sussex, England 
(0424)-220391 



DEALER INQUIRIES WELCOME. LDOS is a product of LSI. TRS-80 & Radio Shack are trademarks. 
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Files and foibles 



List linking 



Model I, II and III 



T. R. Dettmann, Associate editor 



Computer scientists have provided us with many 
powerful techniques for dealing with files of 
information. Whole courses are taught in college on how 
to do this ("data structures" is the name of the topic). 
One of the most useful techniques, and one of the most 
common, is the linked list. 

Richard Straw covered list linking techniques in the 
January 1982 issue for lists in memory. He indicated, 
however, that list linking was not very useful for disk 
files because of the "thrashing" that the disk will go 
through. 

As a general rule, he is quite right. In the worst cases, 
a linked list can exist in such a way as to really give the 
disk drive a workout trying to access the records. 
However, there are still cases where list linking is not 
only useful, but very efficient for controlling disk files. 
Linked list techniques are also closely related to other 
structuring techniques which make random disk files 
much more efficient. 

As an example of where a linked list can be useful, 
let's consider a job costing system which includes a 
variable number of job functions, from zero through 99, 
depending upon the job. If we set this up as a random 
access file, we could fix it so that every job has space for 
99 functions, whether it uses them or not. 

This is efficient from the standpoint of access to the 
functions, but unless most jobs have 99 functions, it will 
be a big waste of disk space. Let's say the average job 
has five functions, a few jobs have none or 10, and only a 
very few have greater than 10. In this case, we could 
improve our efficiency by setting up each job with 
enough space for five functions when it is created. 

So what happens when we need more functions? A 
simple approach is to start another record, store five 
more functions there, and link it to the first with the 
linked list technique. Most jobs will have, at most, one 
link. Many jobs will have none. Only a few jobs will 
have to link together more than two records. 

Efficient storage is a major problem. List linking can 
help. List linking can also be a real problem. Aside from 
the problem of "thrashing", which is very real, we can 
also get into problems if we don't want to access our list 



in the order naturally provided by the links. 

In our job costing example, we could always bring all 
job functions into memory when we need to work on the 
job. It is a simple technique and well worth the effort. 
But what if we used a linked list to store a mailing list? 
In a mailing list, we may want to retrieve everyone in 
alphabetical order. If we link every record into an 
alphabetical list, we can just follow the links and get 
everyone. But what if we want to change just one 
record? 

In order to change one record in the file, we first have 
to find it. To find it, we search through the list starting 
with the first record. The one we want to change might 
be "Markson." It could even be stored in record number 
one in our file, but with a linked list, we wouldn't find it 
until we searched through the whole list up to that point. 
This is where thrashing becomes a problem. Let's see 
how a linked list works to see why this is so. 

How it works 

A linked list works by having each item in the list 
include a "pointer" which points to the next item in the 
list. This pointer is nothing but the disk address — the 
record number of the item. Figure 1 shows a simple list 
which is linked in numerical order. 

The big advantage of the linked list is that it can add 
new items anywhere in the file and yet still have them 
recovered in a predetermined order. As with everything 
else in computers, you do not get something for nothing. 
In order to get convenience of retrieval, you have to store 
extra data (the pointers) and you have to take extra time 
to get it ready. Still, in some cases, it is worth it. 

A simple example 

To show list linking in a form other than that used in 
the January 1982 issue, let's consider this problem. 
Assume that we want to maintain a "To/Do" list (one of 
my favorite problems.) However, we want to maintain it 
on a monthly basis, with entries for each day we have 
something to do. 

We could make a big list and sort it by day, but let's try 
something else. We will put a master pointer for each 
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Figure 1 

A sample linked list. 

Follow the arrows to follow the links. 



Record 
Number 


Random Access 
File 




1 


List Header 


8 





Mary 


7 


Larry 


2 


Terry 





Jerry 


3 


Harry 


5 


C 1 


Perry 


4 


V^8 


Garry 


6 


9 






1 
] 


Data L 
Tield F 


ink 
ield 




Figure 2 
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Last entry day 4 
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day of the month in the first record of a file. This pointer 
will point to (or remember) the beginning of a list of 
items to do. We will also store a pointer which points to 
the last item in each day's list(see figure 2). We will use 
this to simplify adding new things to the list. 

As we add to the list, we put the item in the first 
available space and then add it to the end of the 
appropriate day's list. When ready to print out a list for 
a given day, we simply follow the threads, printing each 
item as we get to it. 

While thrashing is a problem, we would almost have 
to work at it to make it a serious one. The program 
listing included here illustrates a simple solution to the 
problem. 

10 REM********************************* 
******************************** 

20 REM 

30 REM SIMPLE LIST LINKING 

40 REM 

50 REM TERRY R. DETTMANN 

60 REM VERSION 1.0 01/30/82 

70 REM 

80 REM FILENAME: LISTS/BAS 

90 REM 

100 REM******************************** 
******************************** 

110 CLEAR10000:DEFINTA-Z 
120 DIM DT$(31),STK$(31) 
200 REM MENU 



210 CLS:PRINT"MONTHLY TODO LISTS" : PRINT 

: PRINT 

220 PRINTTAB(10)"0. END" 

230 PRINTTAB(10)"1. GET NEW MONTH" 

240 PRINTTAB(10)"2. ADD/EDIT/DELETE EN 

TRIES" 

250 PRINTTAB(10)"3. PRINT DAY'S ENTRIE 

S" 

300 REM SELECTION 

310 PRINT: PRINT: PRINT 

320 PRINTTAB( 10 ) ; : INPUT"SELECTION" ; S 

330 IF S=0 THEN CLOSE:CLS:END 

340 IF S<1 OR S>3 THEN 320 

350 ON S GOSUB 1000,2000,3000 

360 GOTO200 

500 REM GET A KEY 



510 C?=INKEY$:IF C$=""THEN510 ELSE RETU 

RN 

600 REM DELAY ROUTINE - 

610 PORTM=1TO500:NEXTTM:RETURN 

1000 REM GET A NEW MONT 

H - 

1010 CLOSE: PRINT 

1020 PRINTTAB(10)|:LINE INPUT"MONTH: "; 

MN$ 

1030 FF$=*HD$(MN$,i,3)+"/DAT" 
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More powerful programming tools 
for theTRS-80. Nowon disk. 



Better results. Microsoft's Level III BASIC and Editor/ 
Assembler-Plus are programming tools that help you write 
complex programs in less time, with less effort and util- 
izing less memory. Better programs. No matter what your 
programming skill. And for the first time these tools are 
available on disk. 

Editor/ Assembler-Plus. A powerful editing, assembly and 
debugging tool with many sophisticated features that make 
writing TRS-80 assembly language programs easier, faster 
and more efficient. 

• Full disk capabilities. 

• Assembly directly into memory. No need to save object 
code then reload for execution. 

• Macro capability that allows you to define macros for 
commonly used sequences of instructions. 

• Conditional assembly that allows you to generate more 
than one version of a program. 

• Eight breakpoints at a time for program debugging. 

• The INCLUDE statement that allows you to call additional 
disk files for assembly. 

• Other features include extensive operators, automatic 
origin, symbol table printout, quash command, hex, deci- 
mal and octal constants, single step-through instructions 
in memory, five type-out modes, four type-in radices, plus 
extensive edit commands. 

A more powerful BASIC. With Level III BASIC, you get 
power to perform tasks in BASIC that used to require 
assembly language. Plus, new ease-of-use features for 
your TRS-80. 

• Advanced graphics. Develop charts, graphs, even anima- 
tion in Level III BASIC. Draw a line, an outline box or 

Circle 



a solid box by specifying just two points. Then save and 
recall if with BASIC commands. 

• MENU. One command that allows you to construct an 
entire menu. 

• CHAIN and COMMON commands allow you to call 
another program and pass variables to it. 

• Powerful editing commands such as COPY/TRANSFER, 
FIND and CHANGE. 

• DUMP command that makes debugging easier. 

• Time-limit response. New INPUT # LEN and LINE INPUT 
# LEN commands allow you to set a time limit on response. 

• RS-232 output from BASIC. With a single command. 

• More. Level III gives you automatic line numbering, 26 
user-definable single stroke instructions, and more. 

Disk or cassette. Disk versions of Level III and Editor/ 
Assembler-Plus are brand new. Cassette versions are also 
available with many of the same capabilities. 
Talk to your Microsoft™ dealer. Ask for a demonstration 
of two of the most powerful tools you can get for your 
TRS-80: Level III BASIC and Editor/ Assembler-Plus. On 
disk or cassette. From Microsoft. 

TRS-80 is a trademark of Radio Shack, a division of Tandy Corporation. 

Microsoft is a trademark of Microsoft, Inc. 

Microsoft Consumer Products is a division of Microsoft, Inc. 

/MCfipSOfT 

V consumerIproductsP 

10700 Northrup Way, Bellevue, WA 98004, (206) 828-8080 
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1040 OPEN"R H ,l,FF$,62 

1050 FOKE=1T031:FIELD#1,(I-1)*2 AS DMY$ 

,2 AS DT$(l):NEXTI 

1060 FIELD#1,60 AS IT$,2 AS LK$ 

1065 F0RI=1T031 : FIELD* 1,(I-1)*2 AS DMY$ 

,2 AS STK$(l):NEXTI 

1070 IF LOF(1)<>0 THEN RETURN 

1080 FORI=1T031:LSET DT$(I)=MKI$(0):NEX 

TI 

1090 PUT1,1:PUT1,2 

1100 LSETSTK$(l)=Ma$(l):PUTl,3 

1110 RETURN 

2000 REM ADD/EDIT/DELET 

E ENTRIES 

2010 PRINT 

2020 PRINTrAB(10);:INPUT"WHAT DAY (0 RE 

TURNS TO MENU)";DY 

2025 IF DY=0 THEN RETURN 

2030 IX = 2*DY-1:GOSUB2500:HD=ID 

2040 IX = IX + 1:GOSUB2500:NI>=ID 

2050 PRINTTAB(10)"<A> ADD <S> SCAN/ED 

IT <R> RETURN" 

2060 PRINTTAB( 10 ) ; : INPUT"SELECTION" ; S$ 

2070 L=INSTR("ASR",S$) 

2080 IF L=0 THEN 2060 

2085 IF L=3 THEN RETURN 

2090 ON L GOSUB 2100,2200 

2095 GOTO2000 

2100 REM ADD ENTRIES 

2110 PRINTTAB(10);:LINE INPUT"ENTRY: "; 

EN$ 

2120 GOSUB2550:LSETIT$=EN$:PUT1,LC 

2130 GOSUB2600 

2140 RETURN 

2200 REM EDIT/SCAN EN 

TRIES 

2210 IF HD=0 THEN PRINT"NO ENTRIES" :GOS 

UB600: RETURN 

2220 LK=HD:LP=0 

2230 IF LK=0 THEN RETURN 

2240 GET1,LK 

2250 PRINT IT$ 

2260 INPUT"ACCEPT (Y/N) h ;YN$ 

2270 IF YN$="Y" THEN LP=LK:LK=CVI(LK 

$):GOTO2230 

2280 IF YN$<> H N" THEN 2260 

2290 PRINTTAB(10);:LINE n«nJT"NEW EN 

TRY: N ;NE$ 

2300 IF NE$="DELETE" THEN QOSUB2900: 

GOTO2230 

2310 LSET IT$«NE$:PUT1,LK 

2320 LP=LK:LK»CVI (LK$ ) :GOTO2230 

..500 REM GET INDEX EN 

TRY 

2510 IF IX>31 THEN GET1,2:N*IX-31 ELSE 

GET1,1:N=IX 

2520 ID-CVI(DT$(N)): RETURN 
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2550 REM GET FREE SPA 

CE 

2560 GET1,3:SP=CVI(STK$(1)) 

2570 IF SP<=1 THEN LO=LOF(l)+l: RETURN 

2580 LOCVI (STK$ (SP) ) :SP=SP-1 :LSETSTK$ ( 

1)=MKI§(SP):PUT1,3 

2590 RETURN 

2600 REM-- ; LINK INTO LI 

ST 

2610 IF HD=0 THEN HD=LC:ND=LC:GOSUB2700 

: LK=0 : RC=LC :GOSUB2750 : RETURN 

2620 RG=ND:ND=LC:GOSUB2700 

2630 LK=LC:GOSUB2750 

2640 LK=#:RG=LC:GOSUB2750 

2650 RETURN 

2700 REM UPDATE MASTE 

R POINTERS -- 

2710 IX=2*DY-1:ID=HD:GOSUB2800 
2720 IX=IX+1:ID=ND:GOSUB2800 
2730 RETURN 

2750 REM UPDATE REGOR 

D LINK 

2760 GE r ri,RC:LSEI , LK$=Mia$(LK):PUTl,RC:R 
ETURN 

2800 REM WRITE INDEX 

ENTRY 

2810 IF IX>31 THEN RD=2:GET1,2:N=IX-31 
ELSE RD=1:GET1,1:N=IX 

2820 LSErDT$(N)=MKI$(lD):PUTl,RD:RETURN 
2900 REM DELETE ENTRY 

2910 L1=LP:L2=LK:L3<VI(LK$) 

2920 IF L1=0 THEN HD=L3:GOSUB2700 

2930 IF L3=0 THEN ND=L1 :GOSUB2700 

2935 IF L1=0 THEN 2950 

2940 RC=€ J 1:LK=L3:GOSUB2750 

2950 GOSUB2960:LK=L3: RETURN 

2960 REM PUSH DELETED 

RECORD ON STACK 

2970 GET1,3:SP=CVI(STK$(1)) 

2980 IF SP>=31 THEN RETURN 

2990 SP=SP+1 :LSETSTK$ (SP)=MKI$ (L2 ) :LSET 

STK$ ( 1 ) =MKI$ (SP) : PUT1 , 3 : RETURN 

3000 REM PRINT DAY'S EN 

TRIES 

3010 PRINT:PRINTTAB(10 ) ; : INPUT"DAY" ; DY 

3020 IX=2*DY-1:GOSUB2500:HD=ID 

3030 IF HD=0 THEN PRINT"N0 ENTRIES" :GOT 

03100 

3040 LK=«D 

3050 IF LK=0 THEN 3100 

3060 GET1,LK:PRINTTAB(10)IT$ 

3070 LK=<^I ( LK$ ) : GOTO3050 

3100 PRINT" PRESS ENTER TO RET 

URN " 

3110 GOSUB500XIF ASC(C$)=13 THEN RETURN 

ELSE 3110 
60000 SAVE"LISTS/BAS" . 



Color computer owners. 




Yes, that's right - for as little as 
$298.00 you can add 32K of dynamic 
RAM, and a disk interface, to your 
TRS-80 Color Computer! If you just 
want the extra memory it's only 
$199.00, and you can add the disk 
interface later for $99.00. 

Just plug the Color Computer In- 
terface (CCI), from Exatron, into 
your expansion socket and "Hey 
Presto!" - an extra 32K of memory. No 
modifications are needed to your 
computer, so you don't void your Ra- 
dio Shack warranty, and Exatron give 
both a 30 day money-back guarantee 
and full 1 year repair warranty on 
their interface. 

The CCI also contains a 2K 
machine-language monitor, with 
which you can examine (and change) 
memory, set break-points, set memo- 
ry to a constant and block-move 
memory. 

So what about the CCI Disk Card? 
Well as we said it's only an extra 
$99.00, but you'll probably want 
Exatron's CCDOS which is only 
$29.95 - unless you want to write your 
own operating system. The CCI Disk 



Card uses normal TRS-80 Model I 
type disk drives, and CCDOS will 
even load Model I TRSDOS disks into 
your color computer - so you can 
adapt existing TRS-80 BASIC pro- 
grams. 

As a further plus, with the optional 
ROM Backup adaptor, you can dump 
game cartridges to cassette or disk. 
Once the ROM cartridge is on cas- 
sette, or disk, you can reload, examine 
and modify the software. The ROM 
Backup adaptor is only $19.95. 

For more information, or to place an 
order, phone Exatron on their Hot 
Line 800-538 8559 (inside California 
408-737 7111), or clip the coupon. 




excellence in electronics 

exatron 




DEALER ENQUIRIES INVITED 



Exatron, 

181 Commercial Street, 

Sunnyvale, CA 94086 



□ Please send a 32K Color Computer 
Interface for $199.00 

□ Please send a CCI Disk Card for $99.00 

□ Please include CCDOS and manual 
for $29.95 

□ Also include a ROM Backup adaptor 
for $19.95 

Please add $5.00 for shipping to all orders, 
and 6 percent sales tax in California. 

Name 

Address 

City 

State Zip 

Charge my: 

□ MasterCard Interbank Code 

D Visa Expiration Date 

Card 

□ Check enclosed for 

D Ship COD ($2.00 extra) 



Signature 



♦32K RAM plus Disk Interface TKS-80 is a trademark of Tandy 
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Base conversions with 
the Pocket Computer 



Pocket Computer 



Peter G. Savard, Livonia, NY 



For a person such as myself, one who gave up serious 
math at an early age, converting from decimal to hex 
and back can be a real chore. Shortly after I purchased 
my Model I, I wrote a program to do these conversions 
for me. 

However, I soon found that no matter how many 
conversions I did before I loaded the program I was 
working on, there was always one more conversion I 
needed to make when my conversion program was not 
available. So, back to pencil and paper. Enter the Pocket 
Computer. 

What application could I put this nifty little gadget 
to? Why not hex to decimal (and decimal to hex) 
conversion? In fact, why not a program which would do 
several of the little chores that a programmer needs to 
do. The program in Listing 1 is the result. 

When you have entered the program, put the 
computer in the DEF mode and press SHIFT and 
SPACE. A menu listing the program options will be 
displayed. The options are: HEX — >DEC — SHIFT H 

Selecting this option causes ENTER HEX # to be 
displayed followed by ?#. Because there are no string 
functions in this BASIC, the digits of the hex number 
must be entered one at a time (four digits must be 
entered, e.g., 732A or 004F). After the last digit is 
entered, the program will process the number and beep 
to let you know it is doing something. In a few seconds, 
the decimal equivalent will be displayed. Press ENTER 
and you can do another number. 

DEC — > HEX — SHIFT D. The same process is 
followed in this section with the exception that the 
decimal number can be entered at once. Press ENTER 
and the program will process the number and display 
the hex equivalent with leading zeros. 

POKE — > PRINT — SHIFT S. With this option, you 
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are prompted to enter the POKE address. The PRINT® 
value of that address will be displayed. 

PRINT — > POKE - SHIFT F. This is just the opposite. 
Enter the PRINT@ address and the POKE value of that 
address will be displayed. 

POKE >32767— SHIFT G. Enter the value of address 
to be poked and the correct value to be poked will be 
displayed. 

Although these are fairly simple calculations, I have 
found them to be a great time saver. I hope others find 
them that way also. Besides, it will give you something 
to do with your Pocket Computer. 

Program Listing for 
Base Conversions 

14 :"D": CLEAR :BEEP 1: INPUT"ENTER DEC 
# -> ";D:I=19 

15 : PAUSE "PROCESSING" 

16 :A=INT (D/4096):GOSUB 150:D=D-4096*A 
:BEEP 1 

18 :A=INT (D/256):GOSUB 150:D=D-256*A:B 
EEP 1 

20 :A=INT (D/16):G0SUB 150:D=D-16*A:BEE 

P 1 
22 :A=INT (D):GOSUB 150:BEEP 1 
24 :PRINT "HEX # =>";A?(20);A$(21);A$(2 

2);A$(23) 
26 :GOSUB14 
100 :"H": CLEAR :BEEP 1: PAUSE "ENTER HEX 

#" 
102 :INPUT A$(20),A$(21),A$(22),A$(23): 

PAUSE"PROCESSING":FOR 1=2 TO 5: BEEP 1 

:A$=A$(18+I):G0SUB 399:NEXT I 
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105 :N=0:N=#f4096*A(2)+256*A(3)+16*A(4) 
+1*A(5) 

106 : PRINT "DEC # => ";N 

107 -.GOTO 10 

150 : 1=1+1 

151 :IF A=0LBT A$(l)="0" 

152 :IF A=1LET A$(l)="l" 

153 :IF A=2LBT A$(l)="2" 

154 :IF A=3LET A$(l)="3" 

155 :IF A=4LET A$(l)="4" 

156 j IF A=5LET A$(l)="5" 

157 :IF A=6LET A$(l)="6" 

158 :IF A=7LET A$(l)="7" 

159 :IF A=8LET A$(l)="8" 

160 :IF A=9LET A$(l)="9" 

161 :IF A=10LBT A$(l)="A" 

162 :IF A=11LET A$(I)="B" 

163 :IF A=12LBT A$(l)="C" 

164 :IF A=13LET A$(l)="D" 

165 :IF A=14LET A$(l)="E" 

166 :IF A=15LET A$(l)="F" 

167 : RETURN 

399 :IF A$="0"LET A(l)=0 

400 :IF A$="1"LET A(l)=l 

401 :IF A$="2"LET A(l)=2 

402 :IF A$="4"LBT A(l)=4 

403 :IF A$="5"LET A(l)=5 

404 :IF A$="6"LET A(l)=6 

405 :IF A$="7"LET A(l)=7 

406 :IF A$="8"LET A(I)=8 

407 :IF A$="9"LET A(l)=9 

409 :IF A$="A"LET A(l)=10 

410 :IF A?="B"LET A(l)=ll 

411 :IF A$="C"LET A(l)=12 

412 :IF A$="D"LET A(l)=13 

413 :IF A$="E"LET A(l)=14 

414 :IF A$="F"LET A(l)=15 

415 : RETURN 

500 :"S":CLEAR :PAUSE "POKE=>PRINT" 

510 :INPUT"POKE.ADD? ";P:P=P-15360:BEEP 

1:PRINT "PRINT ADD = ";P:GOTO510 

600 :"F": CLEAR : PAUSE "PRINT=>POKE " 

610 : INPUT "PRINT ADD? ";P:P=P+15360:BE 

EP 1: PRINT "POKE ADD=";P:GOTO610 

700 :"G": CLEAR :PAUSE "POKE ABOVE 32767 
ii 

710 :INPUT"ADDRESS = ? ";P:BEEP 1:P=-1* 
(65536-P);PRINT"ADDRESS = ";P:GOTO 71 


800 : " ":BEEP 1: PAUSE "PROGRAMING UTIL 

ITIES" 

810 :PRINT "HEX => DEC - SHIFf H" 

812 : PRINT "DEC => HEX - SHIFT D" 

815 : PRINT "POKE => PRINT - SHIFT S" 

820 : PRINT "PRINT => POKE - SHIFT F" 

830 : PRINT "POKE > 32767 - SHIFT G" 

840 :GOTO 800 ■ 



TRS-80* Model 



Hardware & 
Software 
at discount 






Our Price 

15.95 
15.95 
11.95 
15.95 
31.95 
15.95 
40.00 

15.95 
15.95 
79.95 
19.95 
11.95 
23.95 
15.95 

23.95 
15.95 
23.95 
31.95 
23.95 

12.75 
12.75 
12.75 
12.75 
12.75 

11.95 
11.95 
11.95 
31.95 
15.95 



15.95 



ACORN SOFTWARE Sug. List. 

Astro Ball (T or D) "..19.95 

Everest Explorer (T or D) 19.95 

Invaders From Space (T) 14.95 

Lost Colony (T or D) 19.95 

Money Manager (D) 39.95 

Space Rocks (T or D) 19.95 

Superscript (0) 50.00 

ADVENTURE INTERNATIONAL 

Adventures 1 thru 12 (T) each 19.95 

Escape From Traam (T) 19.95 

Maxi Manager (D) 99.95 

Star Fighter (T) 24.95 

Star Trek 3.5 (T) 14.95 

Stone of Sisyphus (D) 29.95 

The Curse of Crowley Manor (T) 19.95 

AUTOMATED SIMULATIONS 

Crush, Crumble & Chomp (T or D) 29.95 

Date Stones of Ryn (T or D) 19.95 

Rescue At Rigel (T or D) 29.95 

Star Warrior (T or D) 39.95 

Tuesday Morning Quarterback (D) 29.95 

BIG FIVE SOFTWARE 

Attack Force (T) 15.95 

Galaxy Invasion (T) 15.95 

Meteor Mission 2 (T) 1 5.95 

Robot Attack (T) 15.95 

Super Nova (T) 15.95 

BRODERBUND SOFTWARE 

Galactic Empire (T) 14.95 

Galactic Revolution (T) 14.95 

Galactic Trader (T) 14.95 

Galactic Trilogy (0) 39.95 

Tawala's Last Redoubt (T) 19.95 

THE C0RNS0FT GROUP 

Scarlman (C) 15.95 

DATAS0FT 

Arcade - 80 (T) 19.95 

HAYDEN SOFTWARE 

Sargon II (D) 34.95 

MED SYSTEMS 

Asylum (T) 14.95 

Asylum (D) 19.95 

Deafhmaze 5000 (T) 14.95 

Labyrinth (T) 14.95 

MICROSOFT 

Adventure (D) 29.95 

Olympic Decathlon (T) 24.95 

RADIO SHACK 

26-2204 Compiler Basic (D) 149.00 

26-1552 General Ledger (D) 99.95 

26-1553 Inventory Control I (D) 99.95 

26-2014 Model III Disk Course (D) 29.95 

26-1596 Model III Visicalc (D) 199.00 

26-1556 Payroll (D) 199.95 

26-1592 Profile III Plus (D) 199.00 

26-1590 Super Scripsit (D) 199.00 

STRATEGIC SIMULATIONS 

Tigers In The Snow (T) 24.95 

SYNTONIC SOFTWARE 

Interlude (T) 18.95 

(T) = Cassette Tape (D) = Disk 



REPRESENTING OVER 20+ COMPANIES WITH 300+ 

PROGRAMS AND HARDWARE. 

WRITE FOR FREE MODEL II, III OR COLOR COMPUTER CATALOGS TO: 

Computer House 

P.O. Box 538, Mammoth Lakes, CA 93546 
(714) 934-6538 

Terms: FOR FAST DELIVERY, send certified checks, money ordere or Vita or MistirCird number 
and expiration date. Personal checks require 3 weeks to clear. ADD SI. 50 for postage. Orders 
over $100 we pay shipping. All foreign orders idd $10. CALIFORNIA residents add OS tax. Prices 
sublec. to change. Circle # 27 

* TRS-80 Is a trademark of Tandy Corp. 



11.95 
15.95 
11.95 
11.95 

23.95 
19.95 

119.20 

79.95 

79.95 

23.95 

155.00 

155.95 

155.00 

155.00 

19.95 
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Basically BASIC. 



GOSUB-RETURN 

How subroutines work 



Model I, II and III 



T. R. Dettmann, Associate editor 



So far in this series we have 
covered some simple things you can 
do in BASIC with a few limited 
statement types, but we have been 
limited primarily by programming 
technique. Just knowing the 
statements in BASIC isn't going to 
make good programs for you. You 
have to know how to use them. 

One of the most important 
advances in programming came 
with the concepts of Modular and 
Structured programming. Don't 
worry, we aren't going to get all 
technical about just what these 
' terms mean. What we will do is work 
out some practical techniques for 
programming based on the 
principles these techniques imply. 

First, let's talk a little philosophy. 
Just what do we mean by "modular 
programming?" 



What Is 
Modular Programming? 

Writing computer programs is a 
fascinating hobby (and even more 
fascinating job). If you think about 
it, you will notice that computer 
programming is really nothing 
more than problem solving. Most 
computer programming courses fail 
to understand that and concentrate 
instead on the mechanics of a 
particular programming language. 

The most significant activity in 
programming is the design of the 
problem solution: working it out in 



such a way that it can be 
programmed on a computer. If we 
look at programming as problem 
solving, then it seems obvious that 
techniques we learned back in 
school for solving problems should 
also work for writing programs. 

One of the very earliest 
techniques we all learned was that if 
you were faced with a b*g problem, it 
is better to break it into a number of 
smaller problems, and then solve 
each of those in turn. Solving all of 
the smaller problems adds up to a 
solution of the big one. 

If the smaller problems are still 
too large to solve easily, we can 
break each of them down into still 
smaller ones. In programming, we 
call this "modularization." Modular 
programming involves nothing 
more than this technique of 
breaking a problem into small 
pieces. Each piece has a "module" of 
the program dedicated to solving its 
part of the problem. 

Subroutines 

Instead of writing several 
modules and threading them one 
after another to solve a problem, it's 
simpler if we can invent a "black 
box" that solves a problem and 
returns the solution to wherever we 
called it from. 

BASIC provides a number of 
built-in functions like the SIN and 
COS functions that operate that 
way. We don't have to know how 



they work. All we have to know is 
that by feeding them a number, we 
get back another number. 

The key point here, is the ability to 
provide similar functions without 
having to know how they work 
inside. A subroutine is a way to 
write the same thing in BASIC. 

A simple example of a frequently 
used routine in programs is a dead 
time loop. It is a short FOR...NEXT 
loop that does nothing but kill a few 
seconds of time whenever such time 
is needed. A dead time loop might 
look like this: 

FOR TM=1 TO 500: NEXT TM 

Many programs use loops like this 
repeatedly. We could write loops 
everywhere we wanted them, but if 
we design a single module to do this, 
we would be able to call it from any 
point without having to remember 
where we are. BASIC does this with 
the GOSUB statement. 

GOSUB-RETURN 

When we have a module, like the 
dead time loop, that we want to use 
at some place in the program, we 
can tell the program to execute and 
remember where it is by using a 
GOSUB. If the dead time loop is at 
line 500, we can run it by saying: 

GOSUB 500 

When BASIC executes the 
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GOSUB, it remembers where the 
program is, then it jumps to the 
subroutine and executes that. In 
order to get back to where we were in 
the program, we end the subroutine 
with the "RETURN" statement. 
This tells BASIC to go back to the 
place where the subroutine was 
called and continue the program 
from just after the GOSUB 
statement. 

To get a feeling for how this 
works, look at the sample program. 
We have defined a number of 
subroutines which print out their 
designation when they are executed. 
Several even call other subroutines. 
The program also turns on the trace 
feature of BASIC (TRON), which 
causes each line's line number to be 
printed on the screen as the line is 
reached for execution. 

Type and run the program, then 
make a list of each line number and 
print statement as they are reached. 
Use a listing of the program to 
follow its execution. This should 
help you see how the GOSUB 
actually remembers where it was 
last. In fact, it can even remember 
when one subroutine calls 
another. 

Program to illustrate GOSUB 

10 REM 

20 TRON 

30 GOSUB 300 

40 GOSUB 100 

50 GOSUB 200 

60 TROFF 

70 END 

100 REM SUBROUTINE 1 
110 PRINT "SUBR 1" 
120 RETURN 
200 REM SUBROUTINE 2 
210 PRINT "SUBR 2" 
220 RETURN 
300 REM SUBROUTINE 3 
310 PRINT "SUBR 3" 
320 GOSUB 400 
330 RETURN 
400 REM SUBROUTINE 4 
410 PRINT "SUBR 4" 
420 GOSUB 500 
430 GOSUB 600 
440 RETURN 
500 REM SUBROUTINE 5 
510 PRINT "SUBR 5" 
520 RETURN 
600 REM SUBROUTINE 6 
610 PRINT "SUBR 6" 
620 RETURN ■ 



Sick of the same TRS-80 software? 
Here's a CHEAP CURE! 



The prescription for the Model I and III: 
CLOAD Masazine! 

A CASSETTE TAPE with 6 to 8 programs a month! 

Some past sensational medications: 

Game — Caterpillar, Suns, CIA Adventure, Reversi. 
Practical — Securities, Energy, Tape Directory, Checkbook. 
Utility — Variable Dump, Display, Edit, Code It. 
Tutorial — Planets, Spell Egg, Atomic Table, Geometry. 

At about 75 cents a program, a subscription to CLOAD 
Magazine is just what the doctor ordered. 




The Bottom Line: 

1 year (12 issues) $42.00 

6 months (6 issues) $23.00 

Single copies 

Back issues $ 4.50 

Good Games #1 $12.00 

Adventures #1 $13.00 

•Temperature and prices rising July 1, 1982 

California residents add 6% to single copies 
North America — First Class Postage Included 
Overseas — add $10 to subscriptions, and 
$1 to single copies. Sent AO rate 

Circle # 28 



The Fine Print 

All issues from Oct 78 on available 
— ask for list (24 Level I issues also). 
Programs are for 16K Level II, 16K 
Model III, and occasionally for disks. 
TRS-80 is a trademark of Tandy Corp. 

MasterCard/Visa welcome! 



W Lb W H U Magazine Inc. 

P.O. Box 1448, Santa Barbara, 

CA 93102 |805) 962-6271 



For the Extended BASIC COLOR COMPUTER 

POfcKETBOOK SURGERY NOT REQUIRED 




The Bottom Line: 

1 year (12 issues) $45.00 

6 months (6 issues) $25.00 

Single copies $ 5.00 

Calif, residents add 6% to single 

copies. 

North America — First Class Postage 

Included. 

Overseas — add $10 to subscriptions. 

and $1 to single copies. Sent AO rate. 

MasterCard/Visa welcome! Circle # 29 



Is your CoCo table-ridden, drinking 
up electrical juice but not getting any 
software solids? A prescription of 
CHROMASETTE Magazine will stop 
the hardening of the ribbon cables. 

The doctor explained that 
CHROMASETTE Magazine is a cas- 
sette tape with 6 to 8 quality programs 
on it. A healthy mixture of games, tuto- 
rials, utilities, and practical programs to 
nurture your computer every month. 
No finger exercises necessary. Just load 
and run. 

Keep CoCo's health costs low. A 
subscription to CHROMASETTE 
Magazine is good, cheap medication 
(under 75 cents a program). 



The Fine Print: 

All issues from July 81 on available - 
ask for list. Programs are for the 
Extended BASIC model only. 



MasterCard/Visa welcome! 



RO. Box 1087 Santa Barbara, 
CA 93102 (805)963-1066 
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Feature program 



Spaceship Orbitor 



A realistic orbital mechanics 
simulation with graphics 






Model I/III, 16K and up 






Delmer D. Hinrichs, Washougal, WA 






Are you tired of the ordinary "Lunar Lander" and 
want to try something a little more realistic? Do you 
want to actually learn something about orbital 
mechanics? Then try this program! 

Program Organization 

This program is intended to give an accurate 
simulation of the action of a spaceship in orbit. To do 
this, it is necessary to calculate true inverse square-law 
gravity. This means that the acceleration of gravity is 
proportional to the mass of the primary divided by the 
square of the distance from the spaceship to the center 
of the primary. Since the effect of gravity during the 
whole segment must be simulated, the effective position 
of the ship for the entire segment is taken to be the 
center point of the segment. This position is estimated 
by projecting the ship's velocity ahead for one-half of 
the segment time, then since this position would always 
lie outside of the true orbit, making a further correction. 

If the rocket engine of the spaceship produces a 
constant thrust, the resulting acceleration will increase 
as the fuel is burned and the total mass of the ship 
decreases. This effect is accurately simulated in this 
program by using the correct logarithmic equation for 
the velocity change due to the rocket burn. 

The position of the spaceship is most conveniently 
calculated and stored in terms of its X and Y 
coordinates, with the center of the primary as the origin. 
Likewise, the spaceship's velocity is used as X and Y 
vectors. Both position and velocity are maintained in 
double precision form, necessary for a smooth landing. 
Since normally there is little change for each segment, 
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the updating of velocity for gravity and for rocket burns 
is calculated in single precision. The accuracy of this 
approach is good; over one complete orbit, the 
calculated position of the ship remains within a couple 
of meters of its theoretical position. 

The impact of the spaceship with the surface of the 
primary will normally occur during one of the 
calculation segments; the impact conditions are then 
interpolated from the segment-end conditions 
immediately before and after impact. 

All user entries and program displays are in polar 
coordinates (direction and magnitude), which are easier 
to visualize than the X, Y coordinates used for 
calculations. Keep in mind that all directions are 
expressed in degrees, in the zero to plus or minus 180 
degree convention. 

The program has fairly complete entry checking and 
error trapping. Most errors will not stop program 
operation, but will display an error message and allow 
you to continue. An exception is reading bad data from 
tape when trying to restore the ship's previous status. 
Since the program has no current ship's status to return 
to, it cannot continue. 

The program listing is fairly well supplied with 
remarks to assist in figuring out what is being done in 
each part of the program. 

Running the program 

After you have loaded the program into your 
computer and entered RUN, it displays a title and asks 
if you want instructions. (Note that any required single- 
character user entry gives instant response without 



If you liked MICROPROOF, then you'll love SON OF MICROPROOF: 

ELECTRIC WEBSTER 



The ultimate spelling checker. 



EASY TO USE: 

Enter the appropriate commdnd. and ELECTRIC 
WEBSTER proofreads your document, displaying 
misspellings and typos on the screen. Then 
correcting ELECTRIC WEBSTER can display 
each error separately, requesting you to enter the 
correct spelling for each. You are also given the 
option of displaying errors in context or adding 
words to ELECTRIC WEBSTER'S 50,000 word 
vocabulary If you do not know the correct spelling 
you may also ask ELECTRIC WEBSTER to look 
it up for you. Finally. ELECTRIC WEBSTER cor 
rerts your document AN in less than a minule 

LOW PRICES: 

Standard MICROPROOF is available on TRS-80 
Model I or II for $69.50. Standard ELECTRIC 
WEBSTER is available for either $89 50 
(TRS-80 Model I or M, Apple) or $149 50 (CP/M, 
TRS-80 Model II and all others) The optional 
correcting feature can be added at any time for an 
additional $60. Correction feature can be ordered 
with a patch to operate directly from your word 
processing software For each patch, optional 
Grammatical Checking feature, or optional 
Hyphenation feature, add $35 



SELECT APPROPRIATE RESPONSE: 

CORRECT MISSPELLED WORD: 
LEAVE WORD AS IS 
DISPLAY WORD IN CONTEXT: 
OISPLAV DICTIONARY: 
ADD WORD TO DICTIONARY: 
EXIT: 



ENTER CORRECT WORD 
HIT -ENTER* KEY 



WORD: 
RESPONSE: 



(Your arrorl 



WHAT THE EXPERTS SAY: 

"■MICROPROOF' should be obtained by 
anyone who uses a word processor." 

M Tannenbaum, CPA, 80 Microcomputing. 8-81 
"One word --Excellent " 

Program Previews, Computronks, 9-81 
"In a comparative review . MICROPROOF was 
found to be faster than all the others." 

P. Lemmons, BYTE Magazine, 11-81 
"Any person able to use a word processing 
program can master it in moments." 

F. Derfler, Info-World. 182 



IMPROVED: 

• One-step proofing and correcting. 

• Lists errors to screen or printer. 

• Can display errors in context. 

• Can display dictionary to locate correct spellings. 

• New precise symbolic dictionary will not miss 
an error 

• Remarkably compact (50,000 word dictionary 
will fit on one 5 inch disk). 

• Even FASTER than MICROPROOF (formerly 
the fastest available). 

• Simple Grammatical Checking 
(Optional Feature). 

• Hyphenates automatically (Optional Feature 
available for some Word Processing programs). 

See your local microcomputer dealer 
or write to: 

CORNUCOPIA 
SOFTWARE 

Post Office Box 5028 

Walnut Creek, California 94596 

(415) 524-8098 
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depressing the enter key.) If you press Y, a concise 15- 
line set of instructions is displayed; if you press N, the 
program bypasses the instructions and lets you select 
one of eight solar system primaries, or lets you return to 
a situation you had previously saved on cassette tape. If 
you pressed neither Y or N in response to the 
"Instructions?" question, an error message is 
displayed, and you may try again. Throughout the 
program, any detectable entry error is caught and 
corrected, or a retry is allowed. 

The eight possible primaries that were chosen have 
little or no atmosphere; a landing on Earth, for example, 
would involve aerodynamic calculations which are 
excessively complicated. Of the eight, Mars is the most 
difficult to land upon due to its relatively high gravity, 
while Europa is the easiest. Therefore, for a landing on 
Mars you are given five times as much fuel as for a 
landing on Europa. In all cases, there is a considerable 
excess of fuel allowed. Io, Europa, Ganymede and 
Callisto are the four largest moons of Jupiter, while 
Titan is the largest moon of Saturn. 

After you have chosen a primary, the program asks if 
you want a graphic or tabular display. The graphic 
display is in two stages. It first shows the progress of the 
ship in orbit, as shown in figure 1. Later, when the ship 
is near to landing, it shows a 10 km high by 20 km wide 
area near the landing site (see figure 2). Only the current 
status of the ship is shown at the top of the display. The 
tabular displays, in contrast, shows as many past 
segments of the ship's status as will fit on the video 
display (see figure 3). As the status segments scroll up, 



the heading remains in place. For orientation, the 
tabular display initially shows a graphical display of 
the position of the ship in orbit, but this is cleared before 
actual piloting begins. 

Next, you may either enter a seed number of the 
BASIC RND function, or let the computer choose one. If 
you enter a seed number, entering the same seed number 
will always give the same initial status for the ship (if 
the same primary was chosen), so that a previous 
landing trial may be repeated. The computer will choose 
a different initial status each time. 

After the spaceship's position and orbit have been 
selected, piloting begins. You are first asked to enter the 
segment time. This is the simulated time that elapses 
between each evaluation and display of the ship's 
status. It may be any integer or decimal number of 
seconds up to 60 seconds. The default value (value used 
by the program if ENTER is pressed without a 
numerical entry) is 60 seconds. To gain access to the 
"On-board computer" (explained later), enter "99" as 
the segment time. 

Next, the program asks for the number of segments, 
whose duration was specified above, to be calculated. 
This may be any integer number up to 32767. The 
default value for the number of segments is one. It is 
often convenient to enter a large number for the number 
of segments to be calculated, watch the progress of the 
ship on the display, then stop calculations when things 
have gone far enough by pressing any key. 

The program next asks for the fuel burn-rate to be 
used. This may by any integer or decimal number of 
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A graphic display of a landing in progress on Callisto. The 
current status of the ship is shown at the top of the display, and 
the orbit path is shown graphically. 



kilograms per second (kg/second) up to 100 kg/second. 
The default value is a zero burn rate, or free-fall. Note 
that three quick presses of ENTER, without any 
numerical entries, gives one 60-second free-fall 
segment. 



A graphic display of a landing almost completed on Callisto. The 
current status now shows meters altitude and meters/sec. 
velocity. The position of the ship at the end of each segment is 
shown graphically on a 10 km. high by 20 km. wide display. 

If the burn rate was not zero, the program next asks 
for the direction of thrust for the rocket burn, in degrees. 
The directions are the same as those shown on the 
graphics display. The default value is zero degrees, or 
straight up if the ship is in the final stages of landing at 
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Color Compu/. 




3 
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Are you tired of searching the latest magazine for 
articles about your new Color Computer? When was the 
last time you saw a great sounding program listing only 
to discover that it's for the Model I and it's too complex 
to translate? Do you feel that you are all alone in a sea of 
Z-80's? On finding on ad for a Color Computer program 



did you mail your hard earned cash only to receive a 
turkey because the magazine the ad appeared in doesn't 
review Color Computer Software? If you have any of 
these symptoms you're suffering from Color Computer 
Blues! 



But take heart there is a cure! 
It's COLOR COMPUTER NEWS. 

The monthly magazine for Color Computer owners and only Color Computer owners. CCN contains the full range of 
essential elements for relief of CC Blues. Ingredients include: comments to the ROMS, games, program listings, product 
reviews, and general interest articles on such goodies as games, personal finances, a Kid's page and other subjects. 
The price for 12 monthly treatments is only $21.00 and is available from: 
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REMarkable Software 

P.O. Box 1192 
Muskegon, Ml 49443 



NAME. 



ADDRESS. 
CITY 



State. 



-Zip- 



Allow 8-10 weeks for 1st issue. 
Circle # 31 
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The optional tabular display of a landing in progress. Several 
past user entries and the status for several past segments are 
shown. The heading remains in place at the top of the display, 
while the user entries and the status scroll up. 

the target landing site (at a position angle of zero 
degrees). 

The program now calculates and displays the results 
of your piloting commands. If all goes well, you will be 
making progress towards a soft, vertical landing at the 
target landing site. If not, you may run out of fuel and 
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The display after a successful landing on Callisto. The exact 
results for the moment of impact with the surface are 
interpolated. 

crash. When the number of segments that you specified 
have been calculated, or if you press any key to stop 
calculations, you will be returned to the "Segment time" 
question. If you landed (or crashed) during the segments 

Text continues on page 72 



BUY DIRECT 

TRS-80 

PERSONAL COMPUTERS 



MODEL II SOFTWARE 

26-4703 Cobol Development. $270.00 

26-4540 Stat. Analysis $90.00 

26-4503 Payroll $360.00 

26-4501 General Ledger $180.00 

26-4505 Accts. Payable $270.00 

26-4504 Accts. Receivable. . . $270.00 

26-4507 Mail List II $108.00 

26-4508 Medical Off. Syst $675.00 

26-4560 Westlaw $225.00 

26-4534 Scripsit Dictionary. . . $180.00 

26-4531 Scripsit 2.0 $360.00 

26-4512 Profile II $162.00 

26-451 1 Visicalc $265.00 



DISCOUNT 
SOFTWARE 



TM - TANDY CORPORATION 



COMPLETE LINE 
OF TRS-80 

MODEL II & III 
COLOR COMPUTER 
POCKET COMPUTER 




BUY DIRECT 

TRS-80 

PERSONAL COMPUTERS 



MODEL III SOFTWARE 

26-1562 Profile $72.00 

26-1592 Profile III Plus $180.00 

26-1566 Visicalc I $83.00 

26-1563 Scripsit $79.00 

26- 1 590 Super Scripsit $1 80.00 

26-1591 Scripsit Dictionary. . .$135.00 

26-1580 Project Manager $90.00 

26-1581 Personnel Manager. . $90.00 

26-1552 General Ledger $90.00 

26-1558 Business Mail List $90.00 

26-1584 Check Writer-80 $90.00 

26-2203 Cobol $180.00 

26-2204 Compiler Basic $135.00 

126-1569 Visicalc III $180.00 



ORDER TOLL FREE 

1-800-841-0860 



WE CARRY THE FULL 

LINE OF TRS-80'S Circle #32 



WRITE FOR FREE CATALOG 

MICRO MANAGEMENT 

SYSTEMS, INC. 

DEPT. NO. 5 



H5C SECOND AVE. S.W. 
CAIRO, GA. 31728 
USA 800-841-0860 
GA. 912-377-7120 



COMPLETE LINE 

OF READY TO RUN 

TRS-80 

COLOR 

COMPUTER PAKS 
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AG 








AI 








AL 




Table 1 




AM 




Variables used in 




AN 




"Spaceship Orbitor" 




AO 




A-H are single precision 








I-N are integer 




AR 




P-Y are double precision 




AT 
AV 

AW 








AO 








Al 








BV 


A 


Multi-use variable 




CO 


AA 


Position angle for 


orbit 


CT 




analysis 




CV 


AB 


Velocity angle for 


orbit 






analysis 




DD 


AC 


New position angle for orbit 






analysis 




DI 


AD 


Delta angle between position 






and velocity 




DM 


AF 


Final altitude, final position 





angle DP 
User entry angle (degrees) 

Initial altitude, initial position DR 

angle DV 
Ship's altitude 

Angular momentum DX 

Random angle, ship's radius DY 

Position angle of orbit mini- E 

mum (degrees) EC 

Radius from ship to center of EN 

primary F 

Ship's altitude for display FR 

Random angle for delta velo- FU 

city, new velocity FV 

New velocity angle GC 

Position angle of orbit min- GV 

imum H 

Minimum orbit altitude HT 

Ship's velocity H$ 

Velocity to circularize orbit I 

Cumulative time to impact IC 
Velocity for display, circular 

orbit velocity IG 

Desired direction, delta velo- IR 

city direction (degrees) IX 

Delta velocity to initiate IY 

Hohmann transfer J 

Distance of miss from landing JG 
site 



Direction from primary (de- 
grees) 

Direction of rocket burn thrust 
Delta velocity, desired velo- 
city, velocity angle 
Delta "X" velocity 
Delta "Y" velocity 
Error code 
Eccentricity of orbit 
Energy of orbit 
Required fuel usage 
Fuel remaining after impact 
Fuel 

Final velocity 

Gravity constant of primary 
Ground impact velocity 
Ship's mass 
Hohmann transfer time 
Name of primary 
Integer FOR loop counter 
On-board computer flag, 1= 
yes 

Graphics flag, l=yes 
Random seed for high byte 
Ship graphics "X" position 
Ship graphics "Y" position 
Integer FOR loop counter 
Tabular graphics display flag, 
l=yes 



/Aee§ssing]fth!i) UiBSX80f IRQM.^ 




It's your choice: 

do it the hard way, or 
get the information you need from 



THE B00K 




VOLUME 
l&ll 




VOLUME I 

The most complete book yet 
on the math routines of the 
BASIC ROM, Models I & III. 
Contains a wealth of detail 
about integer, single and dou- 
ble precision formats, advanc- 
ed math, data manipulation, 
and assembly language inter- 
facing, with examples. In- 
cludes commented listing 
(0708H-1607H), plus a highly 
detailed map of the ROM and 
reserved RAM. 



Comprehensive Guide to TRS-80* Assembly Language Routines 

Each Volume Priced At $14.95 Plus $1.50 Shipping/Handling 
VA residents add 4% tax • Foreign: send U.S. funds, add $4 ea. for overseas delivery 

•Trademark of Tandy Corp. 



INSIDERS SOFTWARE CONSULTANTS, INC. 

P.O. Box 7086, Dept. U 3 • Alexandria, VA 22307 

Please send THE BO0K: □ Volume I □ Volume II 

Name 

Address 

City ' 



.State. 



-Zip. 



Enclosed is O check □ M.O. for $ 

Charge to my □ VISA D MasterCard Bank Code . 

Exp. date: Card No 

Signature 



VOLUME II 

Packed full of useful informa- 
tion on the model I input/ 
output routines, with de- 
tailed listings to illustrate the 
commented source code. 
Learn to control and 
manipulate the keyboard, 
video, printer port, and 
cassette port. Essential for 
assembly language program- 
mers, you can write your own 
routines or use the many pro- 
gramming examples included. 
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JR Random seed for middle byte 
K Integer FOR loop counter 
KR Random seed for low byte 
L Lines of ship's status dis- 
played 
LD Near landing flag, l=yes 
LG Landing graphics background 

flag, l=yes 
M Ship's mass without fuel — 

10,000 kg. 
N User entry selection number 
NA No good angle flag, l=yes 
NG Orbit graphics background 

flag, l=yes 
NS Number of segments 
0$ "Orbit" — to check recalled 

status file 
PI Pi — 3.14159 
PX New "X" position 
PY New "Y" position 
Q Radius correction factor; 

square of radius 
QA Angle of gravity 
R Ratio, ship's new radius 
RA Ratio for impact status inter- 
polation 
RB Rate of burn of rocket engine 
RD Radius from ship to center of 

primary 
RF Final segment radius after 

impact 
RG Radius for gravity 
RI Initial segment radius after 

impact 
RS User entry random seed 
RO Radius of equivalent circular 

orbit 
S Temporary radius 
SM Ship's total mass 
SN Ship's new total mass 
SR Surface radius of primary, 

random seed temp # 
ST Segment time 
S2 One-half of segment time 
TM Elapsed time 
VG Delta velocity due to gravity 
VL Ship's velocity 
VX New "X" velocity 
VY New "Y" velocity 
XG "X" velocity to estimate 

gravity 
XI "X" impact velocity 
XP "X" position 
XR "X" velocity after rocket burn 
XV "X" velocity 
YG "Y" velocity to estimate 

gravity 
YI "Y" impact velocity 
YP "Y" position 
YR "Y" velocity after rocket burn 
YV "Y" velocity 
Z$ User entry 
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MONEY MAGIC! 



douqfiflo. 



DOUGHFLO. The Most Useful Program a Home or 
Business Manager Can Have! 



Designed For The Decision Maker, Doughflo is an interacting system of 
programs for cash flow analysis, budget planning, and bookkeeping. 
In The Home, Doughflo becomes a key tool in solving the puzzle of balancing ex- 
penses vs. income. Doughflo shows you where the money goes. 
Fire Your Bookkeeper! You, the new bookkeeper, will have easy access to 
all expense records. Rapidly find and display any number of entries by description, 
type, emount, dete, or number. 

Simple To Use, Doughflo is quick end efficient, cerefully guiding you from data 
entry to report generation. 

User Friendly input screens and single keystroke commands allow quick and 
easy data entry and computer interaction. 
Amazingly Versatile I Indispensable in home or business for: 



• Budget Planning 

• Tax Preparation 

• Bookkeeping 

• Financial Analysis 



Gain Valuable Insight. Doughflo is ready to save you time and money. 
Requires 32K and one or more disk drives, specify Model I or III. $98.95 postpaid 
to continental North America. For more information check reader service 
number. 



(cilph cinetics) 

^■kaTaaaaaaall apparatus • ■TaaataaaaaaaaaaaaaaaaaTaaaTNaTJaaTJaaalaaT*^ 



P.O. Box 597 Forestville, Ca. 95436 
24 hr. phone (707) 987-7237 



"A 

PERFECT 

CLOAD 

EVERY 

TIME"* 
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tope digitizer 

•From 8 review in September-October 1 9B0 Elementary Electronics. Reprints available upon request. 



At last there is a cure for TRS-80 tape cloading blues I For over 
three years, Alphanetics has been selling the TRS-80 Tape Digitizer, a'proven 
hardware solution for your softwere problems. No longer need you juggle the 
recorder's volume control endlessly, trying for a perfect cload of a pre-recorded 
program. Just pop the tape into the cassette recorder, process the signal 
through our digitizer, and you're ready to RUN a perfect load! 
Just check out the Tape Digitizer's features . . . 



• Makes tap* program loading virtually Independent of 
volume control aetting. 

• Allows copying syatam and normal tapes without using 
computer. 

• Makes e perfect digital copy of eny tape without using com- 
puter, removing hum, noise, and cures minor dropouts. 

• Cassette switch allows manual control of cassette 
recorder, independent of computer control. 

• "GOOD DATA" indicator easily snablss aetting proper 
volume . . . doubles aa a tape monitor. 

• A.C. powered — no batteries to replece. 

• Housed in s sturdy, attractive metal case. 

• Completely compatible with Level I 4> II, alec LOW apead 
(500 baud] Model III. 

Circle # 34 

Feed your cassette to the Alphanetics Tape Digitizer and feed your computer the 
exact digital waveform the TRS-80 gave your tape. Get rid of your tape bugs 
today — S64.95 postpaid to continental North America, or return within 10 
days for a full refund! 
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being calculated, your impact status will be displayed 
as shown in figure 4. Note that when your altitude from 
the primary's surface becomes less than 10 km the 
altitude display changes from km to meters, and the 
velocity display changes from km/sec. to meters/sec. 
This makes it easier to give the fine control needed for a 
soft landing. 

The on-board computer 

This feature allows you to calculate some of the 
celestial mechanics values that you need to do a good 
job piloting (or to save the spaceship's current status on 
cassette tape). During calculations, the ship's current 
status is shown at the top of the display for reference, 
and the "initial" entry values default to the ship's 
current status. The four possible calculations are: 

1. Hohmann transfer 

2. Orbit analysis 

3. Delta velocity to change ship's velocity and 
direction. 

4. Required fuel usage for a given delta velocity. 

In addition, you may save the ship's current status on 
cassette tape, end calculations and return to piloting or 
exit from the program and return to BASIC. 

The Hohmann transfer is a minimum-fuel usage 
maneuver to go from a circular orbit at one altitude to a 
different circular orbit at a higher or lower altitude. 
Such a transfer requires two separate rocket burns, on 



opposite sides of the orbit. If you are going from a higher 
to a lower orbit (as for preparing to land from orbit), the 
first rocket burn is made so as to slow the ship down to 
the initial transfer orbit velocity, and also leave it 
traveling in an exactly horizontal direction (the ship's 
position angle plus or minus 90 degrees). Then free-fall 
until the ship is exactly half-way around the orbit from 
the position of the first rocket burn (position angle 
change of 180 degrees). At this lowest point on the 
transfer orbit, make a second rocket burn exactly 
opposite to the ship's velocity direction to slow down to 
the circular orbit velocity at this new altitude. Actually, 
for making a landing this second rocket burn would 
normally be made approximately over the landing site, 
and would be continued long enough to stop all 
horizontal velocity. 

To use the Hohmann transfer routine, key in the 
initial altitude (or just press ENTER to use the ship's 
current altitude), then key in the desired final altitude 
(default, zero altitude). Eight values will then be 
displayed. The circular orbit velocity at the initial 
altitude, the delta velocity (change in velocity) to 
initiate the Hohmann transfer, the initial Hohmann 
transfer orbit velocity, the time required to make the 
transfer, the final transfer orbit velocity, the delta 
velocity required to circularize the orbit at the new final 
altitude, the circular orbit velocity at the new altitude 
and the total delta velocity required for the maneuver. 
Delta velocities which are negative mean to slow down, 



Gosub International Inc. 



GOSUB's MX80/70 Friction Feed Kit $49.95 ppd. 

• Use Single Sheet Paper Use Inexpensive Roll Paper • 

• Use Your Own Letterhead Does Not Affect Pin-feed Use • 

PRINTERS PRINTERS PRINTERS 

EPSON MX80 ...$545 ppd EPSON MX 100 ...$825 ppd 

THE PRINTER STAND $29.95 

SAVE MONEY AND SPACE— Holds almost any printer that uses 
9y2"-size paper or forms. Made from V4" acrylic, allows 3" of paper or 
forms to be stacked under printer. Great for use with bottom load 
printers! Fits MX 80/70-Microline 80's BASE 2-850 Bytewriter-1 
and many morel 

AUTHORIZED DEALERS FOR THE GOSUB FRICTION FEED KIT 
USA— Alpine Computer Center, 2526 S. Alpine Rd., Rockford, III. 
61 1 08, (81 5) 229-0200; OMEGA Micros, 3819 West Michigan St., 
Milwaukee, Wl 53208, (414) 933-6088; EXATRON, 181 Com- 
mercial St., Sunnyvale, CA 94086, (800) 538-8559/CA, (408) 737- 
7111. 

CANADA— Microwest Dist. Ltd., 1940 Larson Rd., North Van- 
couver, B.C., Canada V7M 2Z8, (604) 988-9998 or 988-6877. 
AUSTRALIA— Computer Campus Pty. Ltd., 11 Rundle Street, 
Kent Town, South Australia, 5067, Ph. 08.424826, telex 88156. 

STRATEGY SIMULATIONS FOR THE TRS-80 



MERCENARY FORCE 

Command a mercenary army. 
Decide the number of men, type 
of weapons, armor, air support, 
medical aid and transports. 
Battle the enemy in jungles, 
underwater, on moons and in 
space. (1-4 players) 
TRS-80 L2/16K $16.95 



Gosub Int'l., Inc. 

501 E. Pawnee, Suite 430 

Wichita. KS 6721 1 

(316)265-9859 



SPACE MERCHANT 

Build an Empire in the stars. 
Choose your cargo, means of 
shipping, and security. Risk 
pirates, ion storms, engine 
failure and other hazards while 
you try to become a Space 
Merchant. (1-6 players) 
TRS-80 L2/1 6K $9.95 



80 SPACE RAIDERS 
Starship Simulator and Combat Game 

This is the most realistic combat space simulation available for any 
computer system anywherel Operator is placed in a rapidly moving 
ship looking out through a window into the depths of space. 
Thousands of stars appear in the distance and part toward the screen 
edges as the ship flashes past. Forward and aft views available at any 
time. Accurate celestial navigation using both XYZ and spherical 
coordinates! Comment from Aug. '81 80 Microcomputing: "May be 
the ultimate Star Trek-type game and, possibly, the most complex 
microcomputer game ever attempted"! Fast action graphics never 
stopl Model 1 /Level 2/1 6K $24.95 



SOFTWARE 

Software for the V|C 20 and Color Computer 

SPACE MERCHANT— See Strategy Simulations for the TRS-80. 
WARRIOR— Head to head combat in a game where you and your 
opponent are the rulers of warring city-states, each trying to destroy 
the other. You decide how many of your population will be warriors, 
farmers, factory workers, and scholars. $9.95 

YAHTZEE I $10.95 

GAME PACK #1 Quarter Horse and Yahtzee $14.95 

GAME PACK #3 Warrior and Space Merchant $14.95 

Kansas residents add 3% sales tax 
All prices subject to change without notice 

^__^-i FREE CATALOG UPON REQUEST /~^___^ 

rjaS't (TRS-80 is a trademark of Tandy Corp.) /ifl^k7 

\^Bg0\ Dealer Inquiries Invited CjP^D/ 

\^ — - SEND CHECK OR MONEY ORDER ~~^/ 



GOSUB International (New England Division) 

P.O. Box 2566 

Framingham, MA 01701 



(add 6% sales tax) 



GOSUB 
P.O. Box 275 
Wichita, KS 67201 
(316) 265-9992 
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while positive delta velocities mean to speed up. 

The orbit analysis routine will determine the 
minimum altitude of the orbit and the minimum 
altitude position. It will also calculate the velocity and 
altitude at any other position angle on the orbit. This is 
very useful for helping to decide what to do. 

To use the orbit analysis routine, either key in the four 
values that define the ship's position and velocity, or 
just press ENTER four times to use the ship's current 
status. The display will then show either "Elliptical 
orbit" or "Hyperbolic orbit" for the ship, and also the 
position angle and altitude of the orbit minimum. The 
routine will then ask for a new position angle. When you 
enter an angle (default is zero), the display will show the 
altitude and velocity of the orbit at this new position 
angle. For hyperbolic orbits, it may happen that no orbit 
exists at the entered position angle. 

The delta velocity routine calculates the direction and 
magnitude of the velocity change required to adjust the 
ship's trajectory from one direction and speed to a 
different direction and speed. This is essentially a two- 
dimensional vector subtraction. 

To use the delta velocity routine, key in the initial 
velocity angle and magnitude (or just press ENTER 
twice to use the ship's current velocity), then key in the 
desired final velocity angle and magnitude. The 
display will then show the velocity angle and 
magnitude required to change the ship's velocity from 
the initial status to the new status. 

The fuel usage routine calculates how much fuel must 



be burned to give the ship the desired delta velocity. 
This usage depends upon the total mass of the ship and 
upon the rocket exhaust velocity (assumed to be 
4km/sec. for the hydrogen/oxygen fuel that the 
spaceship uses). 

To use the fuel usage routine, key in the ship's mass 
(or just press ENTER to use the ship's current mass), 
then key in the delta velocity. The display will show the 
fuel usage required to give that delta velocity. 

The ship's current status may be saved on cassette 
tape either to continue the problem at a later time or to 
insure that the failure of a "dangerous" maneuver does 
not make it necessary for you to start over from the 
beginning. After the ship's status has been saved on 
tape, it may be recalled at any time by exiting from the 
program, then entering RUN to restart the program and 
selecting the "Recall previous status" option instead of 
a primary. 

Remember when using the "On-board computer" that 
its calculations are single precision, and therefore will 
not agree exactly with the actual motion of the 
spaceship. 

When you are through using the On-board computer 
routines, you may either return to piloting the spaceship 
or exit from the program and return to BASIC. 

Efficient piloting 

Theoretically, the most efficient (lowest fuel usage) 
way to make a landing from orbit is to wait until the 
ship is at a position angle of 180 degrees (directly 



all hardware Model I Lowercase 



TRS-80 is a Trademark of Tandy Corp. 



DUALCASE 

UPPER/lowercase, full time from power-up; 
NO software; Standard typewriter keyboard 
operation (shift to UPPERCASE); Control char- 
acters can be displayed; 1 28 Total character 
set plus full graphics. 
ELECTRONIC SHIFT-LOCK 

No extra keys or switches. Simply tap either 
shift key, UPPERCASE lock, normal shift unlocks. 

DEBOUNCE 

If dirty keys are a problem, this is for you. 

BLOCK CURSOR 

Easier to locate on a full screen. 

SHORT CASSETTE LEADER 

For tape based systems. 

SWITCHABLE 

Disable from key board 




"THE PATCH" is compatible with any word 
processor, any DOS and also other languages 
which use ROM sub-routines. 

"THE PATCH" unit plugs into the ROM 
sockets (does not replace existing ROM). Lower- 
case does require installaton of the extra video 
RAM (supplied with "THE PATCH"). 

Detailed instructions guide even the most 
inexperienced owner to complete installation in 
about 30 minutes. 

Assembled and tested $1 27.00 

Texas residents add 5% sales tax. 

WHEN ORDERING SPECIFY "Mem Size" □ "Memory Size" D 
To order, send payment plus $2.00 shipping and handling 



HACKS 



P.O. BOX 12963 
HOUSTON. TEXAS 77017 



"THE PATCH" is a trademark of CECDAT. INC. 



Circle # 35 



713 455-3276 

"THE PATCH" is covered with a one year 
limited warranty on materials and workmanship. 
(Does void Radio Shack's 90 day warranty.) 
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opposite the landing site at zero degrees), make a rocket 
burn to put the ship into a Hohmann transfer orbit to 
zero altitude at the target landing site, wait until the 
ship gets to the landing site, then stop. Of course, this 
isn't practical, as the ship cannot stop instantly, and a 
little room should be left for maneuvering. However, the 
closer such a trajectory can be approached, the less fuel 
will be required. 

After orbital motion has been stopped, and the ship is 
dropping vertically to a landing, fuel usage is 
minimized by waiting as long as possible before making 
a rocket burn, then using maximum thrust to slow down 
for a soft landing. 

Nearly all available memory of a 16K TRS-80 is used 
by this program. Only about 40 bytes are left unused 
(?MEM will still show over 100 bytes after an "out of 
memory" halt.) Therefore, if you want to add features to 
the program, be sure to delete enough of the remarks to 
give sufficient space. Model III users will have to delete 
a minimum of 258 bytes. 

Good luck! (You will need it at first). 



Program listing 

10 CLS : RANDOM 

20 PRINT" <- CELESTIAL MECHANICS ORBITOR 
: SPACESHIP LANDING ->" 



30 ' (C) BY D. D. HINRICHS 1979 

40 DEFINT I-N : DEFDBL P-Y : M=1E4 : PI 

=3.1415926535897932 
50 PRINT : PRINT"DO YOU WANT INSTRUCTIO 

NS (Y OR N)?" 
60 GOSUB 3330 : IF Z$="Y" GOTO 3030 ELS 

E IF Z$="N" GOTO 80 
70 GOSUB 3310 : GOTO 50 
80 PRINT :PRINT"SELECT A PRIMARY THAT Y 
OU WISH TO ORBIT AND LAND UPON.", "YO 
UR FUEL SUPPLY IS ADJUSTED ACCORDINGL 
Y." 

MERCURY" 
THE MOON" 
MARS" 
10" 

EUROPA" 
GANYMEDE" 
CALLISTO" 
TITAN" 

RECALL PREVIOUS STATUS 
FROM CASSETTE TAPE" 
180 PRINT"WHICH DO YOU WANT TO TRY?"; 
190 GOSUB 3330 : CLS : N=VAL(Z$) 
200 IF N=9 GOTO 2950 
210 IF N<1 OR N>8 GOSUB 3310 : GOTO 80 



90 PRINT" 


1. 


100 PRINT" 


2. 


110 PRINT" 


3. 


120 PRINT" 


4. 


130 PRINT" 


5. 


140 PRINT" 


6. 


150 PRINT" 


7. 


160 PRINT" 


8. 


170 PRINT" 


9. 
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EDflS 3.5 

EDAS is a sophisticated Editor 
and Assembler for TRS-80 I & III 

• All text may be input In upper or 
lower case. 

. Assemble directly from one or 
more disk files via *GET. 

• Assemble to disk or memory 

• Binary, octal, decimal, hex, and 
string constants; Multiple con- 
stants may be input on a single 
line. 

• CMDFILE utility included. 

• Conditional assembly support. 

• Cross-Reference utility. 

. DOS functions DIR, FREE, KILL, 
and LIST are supported. 

• 14-character labels Including 
special chars. "@", "$",".","?". 

• Editor Includes block move, 
global change, renumber, find. 

. EDTASM & M-80 source files 
can be read or written. 

• Expression evaluator supports 
+, -, *, /, MOD plus logical AND, 
OR, and XOR. 

• Paged & titled listings with page 
numbers and date/time. 

. PAGE, TITLE, SUBTTL, SPACE, 
& COM pseudo-ops supported. 

• Set memory size, page prompt 
JCL execution, Abort option. 

. EDAS is supported with TRSDOS 
compatible DOSs (LDOS, VTOS). 
. Price is $79.00 + $4.00. S&H. 




MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS 
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LDOS, Version 5. 1 is the U Itimate in Operati ng 
Systems for the TRS-80 Models I and III. 
MISOSYS is your East Coast Headquarters 
for LDOS, the documented system! Version 
5.1 is priced at $169.00 + $5.00 S&H per 
system. Deduct $50 if ordering both. 



LDQS 5.1 
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DJSKMDD 

Turn your Editor Assembler Into 
a disk package. This 32K patch 
modifies EDTASM for DOS op- 
eration. Features? Add full disk 
I/O, block move, global change, 
printer pagination, sorted sym- 
bol table, print memory utiliza- 
tion, enhance DEFM expansion, 
protect memory, and recover 
after BOOT. From within the 
EDTASM you will have DIR, 
KILL, & FREE. Upgrade your 
EDTASM! $20. 



SASOSIIAI SASOSIVtl SASOSIIAI SASOSIIAI SASOSIIAI THE B00KS 



DSMBLR 



Complement your assembly language tools with this 
Z-80 disassemblerwhich produces screen, printer, 
cassette, or disk file output. A two pass process 
provides SYM BOLS for 1 6-bit address and 8-bit rel- 
ative references. EQUates & ORG are generated. 
Read SYSTEM programs & display load address 
range. $20 (DSMBLR I for non-disk use is $15). 

EDAS, CMDFILE, DSMBLR Specify Mod I or III. Add 
$1 S&H+$.50 per program. VA residents add 4%. 




MISOSYS - Dept. UP3 

5904 Edgehill Drive, 

Alexandria, Virginia 22303 

703-960-2998 MicroNET 701 40,310 

Dealers Inquiry Invited 

Circle # 36 




THE BOOKs must be a part of 
your tools. Volume I gives you 
access to all math operations in 
your Level II ROM. A symbol 
table of the entire machine not- 
ing over 500 addresses is includ- 
ed. Volume II tells you every- 
thing you wanted to know about 
the level II I/O— printer, key- 
board, video, and cassette rou- 
tines are fully explained. Each 
volume has a fully commented 
listing of all the routines dis- 
cussed. THE BOOKS will save 
you hours of assembler pro- 
gramming. Each volume is priced 
at $1 4.95 or buy both for$24.95. 
Add $1.50 S&H per book. 
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220 PRINT"DO YOU WANT GRAPHIC OR TABULA 

R DISPLAY (G OR T)?" 
230 GOSUB 3330 : IF Z$="G" OR Z$="T" GO 

TO 250 
240 GOSUB 3310 : GOTO 220 
250 CLS : GOSUB 3220 : CLS : PRINT"SELE 

CTING ORBIT" 
260 RESTORE : FOR J=l TO N*4-3 : READ H 

$ : NEXT J 
270 READ H$, GC, SR, SM 
280 AN=RND(0)*2*PI-PI : RD=SR+100+RND( 

)*2400 
290 XP=RD*COS(AN) : YP=RD*SIN(AN) ' S 

HIP'S X & Y POSITION 
300 VL=SQR(GC/RD) ' S 

HIP'S VELOCITY 
310 IF RND(0)>.5 THEN AN=AN+Pl/2 ELSE A 

N=AN-Pl/2 
320 XV=VL*COS(AN) : YV=VL*SIN(AN) ' S 

HIP'S X & Y VELOCITY 
330 AV=RND(0)*2*PI-PI : R=SR/RD ' A 

NGLE FOR RANDOM DELTA V 
340 DV=VL*(SQR(2*R/(1+R))-1) ' D 

ELTA VELOCITY TO SURFACE 
350 XV=XV+RND(0)*DV*COS(AV) : YV=YV+RND 

(0)*DV*SIN(AV) 
360 IF Z$="G" 'IHEN IG=1 ELSE GOSUB 2610 

370 ON ERROR GOTO 3360 : GOSUB 2330 
380 IF IG=0 INPUT"PRESS 'ENTER'"; Z$ : 

CLS : L=0 : GOSUB 2330 
390 ' REENTRY POINT, COtWAND FOR NEXT 

SET OF SEGMENTS 
400 ST=60 : INPUT"SEGMENT TIME, SEC. = 

"; ST : GOSUB 2810 
410 ST=ABS(ST) : IF ST=99 CLS : GOTO 12 

20 ' ON-BOARD COMPUTER 
420 IF ST>60 PRINT"TIME REDUCED TO 60 S 

EC." :ST=60 :GOSUB 2780 
430 S2=ST/2 
440 NS=1 : INPUT"NO. OF SEGMENTS = "; N 

S : GOSUB 2810 
450 NS=ABS(NS) 
460 RB=0 : INPUT"BURN RATE, KG./SEC. = 

"; RB : GOSUB 2810 
470 RB=ABS(RB) : IF RB=0 GOTO 510 

' DEFAULT, FREE-FALL 
480 IF RB>100 PRINT"BURN RATE REDUCED T 

O 100":RB=100:GOSUB 2780 
490 AG=0 : INPUT"THRUST DIRECPION, DEG. 

« "; AG : GOSUB 2810 
500 GOSUB 2190 : IF NA=0 THEN DR=AG ELS 

E 490 
510 FOR K=l TO NS 

' CALCULATE EACH SEG. 
520 IF RB=0 THEN XR=XV :YR=YV :SN=SM 

:GOTO 570 ' FREE-FALL 




OW-A MODEM 

AND MUCH, 



MUCH MORE! 



AUTOTERM— The ultimate TRS-SO* terminal package that 
exploits the full capabilities of your computer and the 
MICROCONNECTION® with Autodial/Autoanswer. It has ALL 
the features of the "other" smart terminal programs, plus: 

• Dials MICROCONNECTION® from terminal 

• Allows full I/O translation 

• Complete modem control and handshaking 

• Paged screen scrolling 

• Spooled printer output 

• Parity, overrun and framing errors statu«PI| 

• Fully user-configurable it * 

• Includes 77-page manual 

• Text editor and hex conversion unities 

• Requires TRS-80 Model I or ll|/'|fK andJlyJisk drive 

• Price— $99.50. Documentation atone— tt«0 

SMART SERIES SOFTWAilflfc^mE 
M ICROPER I PH ERAfcjJORPORATJON 

All terminal programs {4gf|p'e manual or automatic 
upload/download, two Uoar-def ; nea messages, HSp 1 ' prompt 
message entry, transfe-s EDTASM and Orchestaa-86 1 files, for- 
mats screen line Inrgth, We trarUoi spaed selection, 
upper/lower case drivers auto-repeat key, oeep unction for 
keystroke entry, buffered print outj»tj^om|$til& with SCRIPSIT 
and PENCIL. Comes with lext generator tor Ihose who do not 
have a word processor " " 



SMART 80D 
Requires 
RS232|and 




•$29.US purchase v alone or FREE * 
£2}fflw® orfUHr drive. Available for both 
Trig MICROCONNECTION® 

(cassettie)s|jjg&95 purchased alone or FREE* 
'es Lews] II 16K-48Ksystem. Available for both RS232 
uss-g»ing MICROCONNECTION.® 

WT 606 (wafer)— $29 95 purchased alone or FREE* 
The fjr$I»Bnd only smart terminal program for the EXATRON 
"Sti i ngy Floppy " Requires Level II 16K plus one ESF drive. 

SMART MID (HHfe s —$49.95 purchased alone or $20.00 with 
purchase of MICROCONNECTION. 
The FIRST smart terminal program for the Model III. Offers 
popular features of SMART 80D plus several new features 
associated with the Model III. Requires Model III 32K plus 
one disk drive and RS232 board. 

SMART NIC (cassette)— $29.95 purchased alone or FREE* 
The FIRST cassette-based smart terminal program for the 
Model III. All the power of SMART 80C plus numerous other 
features. Requires Model III Level II 16K plus RS232 board. 

*One software package included with the purchase of each 

MICROCONNECTION.® 
* Trademark of the Tandy Corp. 

the micropenpheral corporation 



2643 151st PI. NE 
Redmond, WA 98052 
206/881-7544 
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530 SN=SM-ST*RB 

' SHIP'S NEW MASS 
540 IF SN<=M PRINT"OUT OF FUEL" : SN= 

M : RB=0 : GOSUB 2780 
550 DV=4*L0G(SM/SN) 

' BURN DELTA .VELOCITY 
560 XR=XV+DV*COS(DR) : YR=YV+DV*SIN(D 

R) ' X & Y VEL AFTER B 
570 XG=(XR+XV)/2 : YG=(YR+YV)/2 

' VEL. TO EST. GRAVITY 
580 PX=XP+XG*S2 : PY=YP+YG*S2 

* POS. TO EST. GRAVITY 
590 RG=SQR(PX*PX+PY*PY) 

' RADIUS FOR GRAVITY 
600 Q=ST/RG/4 : RG=RG-GC*Q*Q 

* RADIUS CORRECTION 
610 QA=ATN(PY/PX) 

1 ANGLE FOR GRAVITY 
620 IF PX<0 THEN QA=QA+PI : IF PY<0 T 

HEN QA=QA-2*PI 
630 VG=GC/(RG*RG)*ST 

' GRAVITY DELTA VEL. 
640 VX=XR-VG*COS(QA) : VY=YR-VG*SIN(Q 

A) ' FINAL VELOCITY 
650 PX=XP+(XV+VX)*S2 : PY=YP+(YV+VY)* 

S2 ' FINAL POSITION 
660 P=PX*PX+PY*PY : R=SQR(P) 

* SHIP'S RADIUS 
670 IF INKEY$<>"" GOTO 390 

' EMERGENCY STOP? 
680 IF R-SR<10 GOTO 710 

' ALT. < 10 KM.? 
690 IF LD=1 THEN LD=0 : L=0 : NG=0 : 

CLS : IF IG=0 THEN NG=1 
700 GOTO 740 
710 S=R :R=(P/S+S)/2 :IF S<>R GOTO 71 

' ADJUST RADIUS 
720 IF LD=0 THEN LD=1 : L=0 : LG=0 : 

CLS : IF IG=0 THEN LG=1 
730 IF R-SR<=0 GOTO 780 

' SURFACE IMPACT? 
740 RD=R :XP=PX :YP=PY :XV=VX :YV=VY 

:SM=SN :TM=TM+ST/60 
750 GOSUB 2330 

' SHOW NEW STATUS 
760 NEXT K 

' NEXT SEGMENT 
770 GOTO 390 

' NEXT COMMAND 
780 ' IMPACT ROUTINE 
790 Q=XP*XP+YP*YP : RI=SQR(Q) 

' INITIAL SHIP'S RADIUS 
800 R=RI : RI=(Q/R+R)/2 : IF RORI GOTO 

800 ' ADJUST RADIUS 
810 Q=PX*PX+PY*PY : RF=SQR(Q) 
' FINAL SHIP'S RADIUS 

76 80-U.S. Journal 



820 R=RF : RF=(Q/R+R)/2 : IF R<>RF GOTO 

820 ' ADJUST RADIUS 

830 RA=(SR-RF)/(RI-RF) 

' RATIO, C/D 
840 FV=SQR(VX*VX+VY*VY) 

' FINAL VELOCITY 
850 XI=VX+RA* (XV-VX) : YI=VY+RA* (YV-VY) 

' X & Y IMPACT VEL. 
860 GV=(FV+RA*(BV-FV))*1000 : PRINT 

' IMPACT VELOCITY 
870 IF GV>1 print"******** YOU CRASHED 

********"; : GOTO 890 
880 PRINT"CGNGRATULATIONS - - - YOU 

ARE DOWN SAFELY"; 
890 PRINT" ON "; H$ ; "1111" 
900 PRINT"YOUR IMPACr VELOCITY WAS "; G 

V ; " METERS/SECOND" 
910 DI=nATN(Yl/Xl)*180/PI 

' DIRECTION OF IMPACT 
920 IF XI <0 THEN DI=DI+180 : IF YI<0 TH 

EN DI=DI-360 
930 PRINT"YOUR DIRECTION OF IMPACT WAS 

"; DI ; " DEGREES" 
940 AF=ATN(PY/PX) 

' FINAL POSITION ANGLE 
950 IF PX<0 THEN AF=AF+PI : IF PY<0 THE 

N AF=AF-2*PI 
960 AI=ATN(YP/XP) 

' INITIAL POSIT. ANGLE 
970 IF XP<0 THEN AI=AI+PI : IF YP<0 THE 

N AI=AI-2*PI 
980 DM=SR*(AF+RA*(AI-AF))*1000 

' MISS DISTANCE 
990 PRINT"YOU MISSED THE LANDING SITE B 

Y "; DM ; " METERS" 
1000 FR=SN+RA*(SM-SN)-M 

' FUEL REMAINING 
1010 PRINT"YOU HAVE "; FR ; " KILOGRAMS 

OF FUEL LEFT" 
1020 CT=TM+(ST-RA*ST)/60 

' CUM. TIME TO IMPACT 
1030 PRINT" IT TOOK YOU "; C£ ; " MINUTE 

S TO GET DOWN" 
1040 PRINT 
1050 IF IG=0 GOSUB 2280 : PRINT@ 960, ; 

1060 PRINT"DO YOU WANT TO TRY ANOTHER L 

ANDING (Y OR N)?" 
1070 GOSUB 3330 : IF Z$="Y" RUN 
1080 PRINT : PRINT"UNTIL NEXT TIME, THE 

N" 
1090 END 
1100 ' CONSTANTS FOR VARIOUS PRIMARYS 

1110 DATA 0, "MERCURY", 21522, 2440, 40 

000 
1120 DATA "THE MOON" , 4901, 1739, 25000 



How to Buy or Soil 

Computer Equipment 

and Software 



START HERE 
WITH... 




Begin your search in the 
index of Computer Shop- 
per's bargain filled pages. 
Locate the category and 
page number of items 
that interest you from 
TRS-80 and Apple to soft- 
ware and peripherals. 




► 



Start or add to your com- 
puter system by finding 
money saving bargains in 
each month's issue from 
individuals who no longer 
need their personal equip- 
ment. 





You've got your computer 
hardware, but what about 
the software? Use a Com- 
puter Shopper ad to find 
what you need. Someone 
advertising in Computer 
Shopper probably has what 
you want. 




► 



If you need help with any 
computer related problem 
whether it's an interface 
problem or advice on the 
right peripheral for a home- 
brew system, use the free 
HELP column especially 
designed for that purpose. 



WIA 



JZZ%£- f^Jt^r 



► 



As you outgrow your 
system or want to trade up 
(most dealers won't take 
trade-ins), use Computer 
Shopper ads to sell your 
items to 20,000 readers na- 
tionwide for the low cost of 
12 cents per word. 




Computer Shopper is THE nationwide magazine for buy- 
ing, selling and trading Micro and Mini-computer equip- 
ment and software. Each issue has over 60 pages full of 
bargains of new and used equipment. 

You can save hundreds of dollars by getting the equip- 
ment you need from the hundreds of classified ads in- 
dividuals place in Computer Shopper every month. 

Now is the time for you to join over 20,000 other com- 
puter users who save time and money with a subscription 
to Computer Shopper. 

Subscribe today and get your first issue and a classified 
ad absolutely FREE. Type or print your ad on a plain piece 
of paper and send it along with your subscription. 

Just fill in the coupon or MasterCard or VISA holders 
can phone TOLL FREE 1-800-327-9920 and start making 
your computer dollar go further today. 



Cut out and mail to: COMPUTER SHOPPER 

P.O. Box F115 • Titusville, FL 32780 

Yes, I'll try Computer Shopper, I understand that if I'm 
not satisfied with my first issue I can receive a full re- 
fund and keep the first issue free. 

□ 1 year $10.00 ($30.00 in Canada) 

D I have enclosed my free classified ad. 

□ I want to use my free ad later, send me a coupon. 



ADDRESS: 



CITY: . 



STATE:. 



.ZIP:. 



CQFTIPUTBR SHDPPBR 

P.O. Box F115 • Titusville, FL 32780 
Telephone: 305-269-3211 
Circle # 38 
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1130 DATA "MARS", 43043, 3393, 60000 

1140 DATA "10", 5935, 1819, 25000 

1150 DATA "EURDPA", 3235, 1563, 20000 

1160 DATA "GANYMEDE", 9925, 2638, 30000 

1170 DATA "CALLISTO", 7115, 2424, 25000 

1180 DATA "TITAN", 9170, 2900, 30000 

1190 ' 

1200 • - - - ALL SUBROUTINES AFTER 

THIS - - - 
1210 ' 
1220 ' THE "ON-BOARD COMPUTER" ROUTIN 

E, TO ASSIST PILOTING 
1230 PRINT : PRINT"WHAT DO YOU WANT TO 

CALCULATE? (FOR LANDING ON "; H$ ; 

")", "'INITIAL' ENTRIES DEFAULT TO CU 

RRENT STATUS." 
1240 PRINT : PRINT" 1. HOHMANN TRANSF 

ER TO A NEW ALTITUDE" 
1250 PRINT" 2. ORBIT ANALYSIS" 
1260 PRINT" 3. DELTA VELOCITY TO CHAN 

GE STATUS" 
1270 PRINT" 4. FUEL USAGE FOR GIVEN D 

ELTA VELOCITY" 
1280 PRINT" 5. SAVE SHIP'S CURRENT ST 

ATUS ON CASSETTE TAPE" 
1290 PRINT" 6. END CALCULATIONS AND R 

ETURN TO PILOTING" 
1300 PRINT" 7. EXIT FROM PROGRAM" 
1310 PRINfENTER NO. OF DESIRED ROUTINE 

?" : GOSUB 3330 
1320 CLS : L=0 : LG=0 : NG=0 : 10=1 : N 

=VAL(Z$) 
1330 IF N<1 OR N>7 GOSUB 3310 : GOTO 12 

20 
1340 IF N=6 THEN IC=0 : GOSUB 2330 : GO 

TO 390 
1350 IF N=7 GOTO 1080 
1360 GOSUB 2330 : ON N GOSUB 1390, 1580 

, 1910, 2090, 2890 
1370 CLS : GOTO 1220 
1380 ' 
1390 PRINT"* * * HOHMANN TRANSFER 

CALCULATION * * *" 
1400 AI=AL : GOSUB 2220 : INPUT"ALTITUD 

E, KM."; AI 
1410 IF AI<0 THEN Z$=STR$(AI) : GOSUB 3 

310 : GOTO 1400 
1420 AF=0 : INPUT"ENTER FINAL ALTITUDE, 

KM."; AF 
1430 IF AF<0 THEN Z$=STR$(AF) : GOSUB 3 

310 : GOTO 1420 
1440 CV=SQR(GC/(AI+SR)) 
1450 PRINT"INITIAL CIRCULAR ORBIT VELOC 

ITY = "; CV; "KM./SEC." 
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1460 R=(AF+SR)/(AI+SR) : DI=CV*(SQR(2*R 

/(1+R))-1) 
1470 PRINT"DELTA VEL. TO INITIATE TRANS 

FER = "; DI; "KM. /SEC." 
1480 PRINT"INITIAL TRANSFER ORBIT VELOC 

ITY = ";CV+DI;"KM./SEC." 
1490 A=(AI+AF)/2+SR : HT=PI*SQR(A*A*A/G 

C)/60 
1500 PRINT"HOHMANN TRANSFER TIME = "; H 

T ; "MINUTES" 
1510 FV=SQR(GC/(AF+SR)) : CO=CV* (SQR( 1/ 

R)-SQR(2/(R*(1+R)))) 
1520 PRINT"FINAL TRANSFER ORBIT VELOCIT 

Y = ";FV-CO; "KM./SEC." 

1530 PRINT"DELTA VEL. TO CIRCULARIZE OR 

BIT = "; CO; "KM. /SEC." 
1540 PRINT"FINAL CIRCULAR ORBIT VELOCIT 

Y = "; EV; "KM. /SEC." 

1550 PRINT"TOTAL DELTA V FOR ORBIT CHAN 

GE = ";DI+CO; "KM./SEC." 
1560 GOSUB 2240 :IF Z$="A" CLS: GOSUB 23 

30:GOTO 1390 ELSE RETURN 

1570 ' 

1580 PRINT"* * * ORBIT ANALYSIS 
* * *» 

1590 AG=DP : GOSUB 2220 : INPUT"POSITI0 

N ANGLE, DEG. = "; AG 
1600 GOSUB 2190 : IF NA=1 GOTO 1590 ELS 

E AA=AG 
1610 GOSUB 2220 : INPUT"ALTITUDE, KM. ■ 

"; AL 
1620 IF AL<0 THEN Z$=STR$(AL) : GOSUB 3 

310 : GOTO 1610 
1630 AG=DV : GOSUB 2220 : INPUT"VELOCIT 

Y ANGLE, DEG. = "; AG 

1640 GOSUB 2190 : IF NA=1 GOTO 1630 ELS 

E AB=AG 
1650 GOSUB 2220 : INPUT"VELOCITY, KM./S 

EC. = "; BV : PRINT 
1660 IF BV<0 THEN Z$=STR$(BV) : GOSUB 3 

310 : GOTO 1650 
1670 AR=AL+SR : EN=BV*BV/2-GC/AR : AD=A 

B-AA : AM=BV*AR*SIN(AD) 
1680 AfAM/GC : EC=SQR( 1+2*EN*A*A) : R0= 

AM*A : Af(R0/AR-1)/EC 
1690 IF EC>1 PRINT"HYPERB0LIC ORBIT"ELS 

EPRINT"ELLIPTICAL ORBIT" 
1700 IF ABS(A)>=1 THEN A0=(1-SGN(A))*PI 

/2 > GOTO 1720 
1710 A0=ATN(SQR(1-A*A)/A) : IF R0<AR TH 

EN A0=nA0+PI 
1720 A1=R0/(1+EC)-SR 
1730 IF COS(AD)*SIN(AD)>0 THEN A0=AA-A0 

ELSE A0=AA+A0 
1740 IF ABS(A0)>PI THEN A0=A0-2*PI*SGN( 

A0) 
1750 AO=A0/PI*180 



HW ELECTRONICS 

is pleased to announce the addition of new adventures fror 



THE PROGRAMMER'S GUILDI 

_T"] 

lot 

!0< 





oo 







GAUNTLET OF DEATH 

Cat. No. 3497 16K, L2, MI&III, cass 

MAZE OF DARKNESS 

Cat. No. 3498 16K, L2, MI&III, cass 

TRAMPMAZE DUALOGY: 

GAIINTT.FT OF DEATH & MATE OF DARKNESS 

Cat. No, 3499 32K, L2, MI&III, disk 

TIMEOUEST 

Cat. No. 3500 32K, L2, MI, disk (converts to Mill) 

TIMEOUEST 

Cat. No. 3501 32K, L2, Mill, disk (preconverted) 

TIMEO UEST 

Cat. No. 3502 16K, L2, MI&III, cass 

TF.MPTEOFTHESTTN 

Cat. No. 3503 16K, L2, MI&III, cass 





TEMPLE OF THE SUN 


$24.95 


Cat. No. 3504 32K, L2, MI&III, disk 




iiE? ^M 


DOMES OF KILGARI 


$19.95 


)s&&qm1 


i Cat. No. 3505 15K, L2, MI&III, cass 




DOMES OF KILGARI 


$24.95 




Cat. No. 3506 32K, L2, MI&III, disk 






DEADLY DIJNGE0N 


$14.95 




Cat. No. 3507 16K, L2, MI&III, cass 






DEADLY DUNGEON 


$19.95 




Cat. No. 3508 32K, L2, MI&III, disk 




$19.95 


DREADNAUGHT CHRONICLES 
DEATH DREADNAUGHT & DOMES OF 




$19.95 


KILGARI 

Cat. No. 3509 32K, L2, MI&III, disk 
GRAYLOCK CHRONICLES TRILOGY 


$29.95 


$29.95 


SPIDER MOUNTAIN, DEADLY DUNGEON, & 






DRAGONOUEST 


$35.00 


$24.95 


Cat. No. 3510 32K, L2, MI&III, disk 






TOWER OF FEAK 


$19.95 


$24.95 


Cat. No. 3511 16K, L2, MI&III, cass 






TOWJjRQFJEAR 


$24.95 


$19.95 


Cat. No. 3512 32K, L2, MI&III, disk 

-¥■ ATTENTION COLOR COMPUTER OWNERS* 




$19.95 


TOWER OF FEAR 

Cat. No. 3513 16K, Extended BASIC, cass 


$19.95 



DEALERS: CALL FOR PRICING ON ALL PROGRAMMERS GUILD SOFTWARE 
The Captain 80 Book of 

BASIC Adventures 



' ifa? 



'^W4 



"Well done, highly readable, easy to use. The book is a 
delightful adventure." —George Blank, Editorial Director, 
Creative Computing 

* The first book of its kind! 

* Just $19.95. 

* Contains a unique adventure generator! 

* Famous adventures by famous authors. 

* See it at your local dealer. 

HOWTOOKDER 

Write or phone. Pay by check. M/C, VISA, or COD (add $1.50 for COD). 

(800) 423-5387 (213) 886-9200 

Offer expires Mar. 31. 1982 

Mention this ad and we pay shipping (UPS ground only). 

HW Electronics 

19511 Business Center Dr. Dept. V3 Northridge, CA 91324 






Cat. No. 3496 



■■■ f-r ~.- : ~ 

W Jllfe 




• •■ „ r rim*- 




'*" .£ '■■".' 
,v'.'~ 

> t 

". to- 


$19.95 



WHEN IN SOUTHERN CALIFORNIA, VISIT OUR RETAIL STORES 




ELECTRONICS 



19511 Business Center Dr. 
Northridge, CA 91324 



2301 Artesia Blvd. 
Redondo Beach, CA 90277 
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1760 PRINT"POSITION ANGLE OF ORBIT MINI 

MUM = M ; AO ;" DEG." 
1770 PRINT"MINIMUM ORBIT ALTITUDE = "; 

Al ; " KM." : PRINT 
1780 AG=0 : INPUT B ENTER NEW POSITION AN 

OLE, DEG. = "; AG 
1790 GOSUB 2190 : IF NA=1 GOTO 1780 ELS 

E AOAG 
1800 AN=(R0/(1+EC*COS(AO-A0))) : AV=SQR 

(2*(EN+GC/AN)) 
1810 IF AN<0 PRINT"NO ORBIT AT THIS ANG 

LE" : GOTO 1890 
1820 PRINT"NEW ALTITUDE = "; CSNG(AN-SR 

) ; " KM." 
1830 A=AM/AV/AN : IF ABS(A)>=1 THEN AW= 

PI/2*SGN(A) : GOTO 1850 
1840 AW=ATN(A/SQR(1-A*A)) 
1850 IF AM*SIN(AC-A0)<0 THEN AW=AC-AW+P 

I ELSE AW=AC+AW 
1860 IF ABS(AW)>PI THEN AW=AW-SGN( AW) *2 

*PI 
1870 PRINT"NEW VELOCITY ANGLE = "; CSNG 

(AW/PI*180) ; " DEG." 
1880 PRINT"NEW VELOCITY = "; AV ; " KM. 

/SEC." 
1890 GOSUB 2240 : IF Z$="A" GOTO 1780 E 

LSE RETURN 
1900 ' 
1910 PRINT"* * DELTA VELOCITY TO CH 

ANGE STATUS * *" 
1920 PRINT 
1930 AG=DV : GOSUB 2220 : INPUT"DIRECTI 

ON, DEGREES"; AG 
1940 GOSUB 2190 : IF NAfI GOTO 1930 ELS 

E AD=AG 
1950 AV=BV : GOSUB 2220 : INPUT"VELOCIT 

Y, KM. /SEC."; AV 
1960 IF AV<0 THEN Z$=«TR$(AV) : GOSUB 3 

310 : GOTO 1950 
1970 AG=0 : INPUT"ENTER DESIRED DIRECTI 

ON, DEGREES"; AG 
1980 GOSUB 2190 : IF NA=1 GOTO 1970 ELS 

E DD=$G 
1990 DV=0 : INPUT"ENTER DESIRED VELOCIT 

Y, KM. /SEC."; DV 
2000 IF DV<0 THEN Z§=STR$(DV) : GOSUB 3 

310 : GOTO 1990 
2010 DX=DV*COS(DD)-AV*COS(AD) : DY=DV*S 

IN(DD)-AV*SIN(AD) 
2020 DV=SQR(DX*DX+DY*DY) : IF DX=0 THEN 

DX=1E-10 
2030 DD=ATN(DY/DX)*180/PI 
2040 IF DX<0 THEN DD=DD+180 : IF DY<0 T 

HEN DD=DD-360 
2050 PRINT :PRINT"DIRECTION OF DELTA VE 

LOCITY = ";DD; M DEGREES" 
2060 PRINT"REQUIRED DELTA VELOCITY = "; 

80 80-U.S. Journal 



DV ; " KM. /SEC." 
2070 GOSUB 2240 :IF Z$="A" CLS:GOSUB 23 

30:GOTO 1910 ELSE RETURN 
2080 ' 
2090 PRINT"* FUEL USAGE REQUIRED FOR A 

GIVEN DELTA VELOCITY *" 
2100 PRINT" (ASSUMING A 4 KM./SEC. ROC 

KET EXHAUST VELOCITY) " 
2110 PRINT 
2120 H=SM : GOSUB 2220 : INPUT"SHIP'S M 

ASS, KG."; H 
2130 IF H<0 THEN Z$=STR$(H) : GOSUB 331 

: GOTO 2120 
2140 DV=0 : INPUT"ENTER DESIRED DELTA V 

ELOCITY, KM./SEC."; DV 
2150 IF DV<0 THEN Z$=STR$(DV) : GOSUB 3 

310 : GOTO 2140 
2160 F=H-H/EXP(DV/4) 
2170 PRINT : PRINT"REQUIRED FUEL USAGE 

= "; F ; " KILOGRAMS" 
2180 GOSUB 2240 :IF Z$="A" CLS: GOSUB 23 

30: GOTO 2090 ELSE RETURN 
2190 ' CHECK ENTRY ANGLE 
2200 NA=0 : IF ABS(AG) <=180 THEN AG=AG* 

PI/180 : RETURN 
2210 Z$=STR$(AG) : GOSUB 3310 : NA=1 : 

GOSUB 2780 : RErURN 
2220 ' ENTRY ROUTINE 
2230 PRINT"ENTER INITIAL "; : RETURN 
2240 ' ANSWER ROUTINE 
2250 PRINT 
2260 PRINT"ENTER 'A' FOR ANOTHER, ELSE 

RETURN TO MENU"; 
2270 GOSUB 3330 : PRINT : RETURN 
2280 ' STATUS DISPLAY HEADING 
2290 PRINT@ 0," TIME, POSITIO 

N VELOCITY REMAINI 

NG" 
2300 PRINT" MIN. KM. ALT. DEGRE 

ES KM./SEC. DEGREES FUEL, KG."; 

2310 IF LD=1 PRINT@ 76, "METER A"; : PR 

INT@ 98, "METER/S"; 
2320 RETURN 

2330 ' CALCULATE STATUS DISPLAY 
2340 AL=RD-SR : AT=AL ' ALT 

ITUDE FROM SURFACE 
2350 DP=iATN(YP/XP)*180/PI ' DIR 

ECTION FROM PRIMARY, DEG 
2360 IF XP<0 THEN DP=DP+180 : IF YP<0 T 

HEN DP=DP-360 
2370 BV=SQR(XV*XV+YV*YV) :CV=BV ' SHI 

P'S NEW VELOCITY 
2380 DV=nATN(YV/XV)*180/PI ' SHI 

P'S VEL. DIRECTION, DEG 
2390 IF XV<0 THEN DV=DV+180 : IF YV<0 T 

HEN DV=DV-360 



Feature program 



2400 RJ=SM-M ' SHI 

P'S REMAINING FUEL 
2410 IF L<>0 OR IG=0 OR 10=1 GOTO 2440 

' NO GRAPHICS? 
2420 IF LD=0 AND NG=0 GOSUB 2610 

' ORBIT GRAPHICS? 
2430 IF LD=1 AND LG=0 GOSUB 2730 

' LANDING GRAPHICS? 
2440 IF LD=1 THEN AT=AT*1000 : CV=CV*10 

00 ' CONVERT TO METERS 
2450 IF L=0 GOSUB 2280 : PRINT 

' PRINT HEADING? 
2460 ' PRINT CURRENT STATUS 
2470 IF IG=1 PRINTS 128, ; 
2480 PRINT USING"####.###"; CSNG(TM) ; 
2490 PRINT USING"#######.###"; AT, DP, 

CV, DV, FU 
2500 IF IC=1 RETURN 
2510 IF IG=0 AND JG=1 GOSUB 2810 : RETU 

RN ' NO GRAPHICS? 
2520 IF LD=1 THEN L=l : GOTO 2570 

* NEAR LANDING? 
2530 ' ORBITING GRAPHICS, SHIP 
2540 JG=1 : IX=64-YP/SR*14 : IF IX<0 OR 

IX>127 RETURN 
2550 IY=30-XP/SR*6 : IF IY<9 OR IY>47 R 

ETURN 
2560 SET(IX,IY) : SET(IX+1,IY) : RETURN 

2570 ' LANDING GRAPHICS, SHIP 

2580 IX=64-YP*6.4 : IF IX<0 OR IX>127 R 

ETURN 
2590 IY=44-(XP-SR)*3.2 : IF IY<9 OR IY> 

44 RETURN 
2600 SET(IX,IY) : RETURN 
2610 ' ORBIT GRAPHICS, BACKGROUND 
2620 CLS 
2630 PRINT@ 538,CHR$(176); CHR$(156); C 

HR$(134); STRING? (7, 131); CHR$(14 

0); CHR$(180); CHR$(144) 
2640 PRINTS 601, CHR$(190); CHR$(129); 

CHR$(203); CHR$(171); CHR$(14 

8) 
2650 PRINTS 640, STRING$(25,131) ; CHR$( 

175); CHR$(147); STRING? 

(11,131); CHR$(187); CHR$(135); STRIN 

G$(24,131) 
2660 PRINTS 730,CHR$(131); CHR$(141); C 

HR$(164); STRING? (7, 176); CHR?(14 

0); CHR?(135); CHR?(129) 
2670 FOR 1=0 TO 9 : PRINTS 352+1*64, CH 

R?(191); : NEXT I 
2680 PRINTS 982, "+180 DEG. "; CHR?(191 

); " -180 DEG. M ; 
2690 PRINTS 576, "+90 DEG."; : PRINTS 6 

32, "-90 DEG."; 
2700 PRINTS 604, H? ; : GOSUB 2870 
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FREE SHIPPING WITHIN CONT. U.S.A. 
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CALL 

FOR OUR LOW PRICES 



OKI DATA 



RS232 Not. Req. LYNX Mod m $259.95 

includes auto dial/answer, cables and terminal software 



SUPER UTILITY PLUS by Kim Watt Soecitv 40 or 00 Track $69.95 

SUPERSCRIPT by Acom - Req. 32K, Scripsit & L/C - Disk $44.95 



EDITOR ASSEMBLER PLUS by M icrosoft 16K Tape $2735 

$134.95 



r\fNQQ| I I Q Newest Version 
UUOrLUO -3.4S/3.4D/3.4lllea 



MAXI MANAGER Mod 

UNITERM by Pete Roberts -Modi/Ill 



by Adventure Int'l •„. n - 

II Latest Version 48K Disk $84.95 



Works with most modems $74.95 



MICROSOFT • FORTRAN B0S89.95 ■ A.L.D.S-S89.95 ■ BASIC COMPILER-S179 95 

EDAS bv Misosvs Sophisticated Editor & Assembler $75.95 

LDOS Version 5.1 — Mod I or III $118.95 



LAZYWRITER 
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VERSION 



A Best Buy in Word^ofiefsfiri 
- Mod I or Ml 



Wffi 



Proofreader by Aspen Software Mod I - 49.S5 Mod III • 49.95 

Proofedit by Aspen Software Mod I 28.50 Mod III - 28.50 

Grammatik by Aspen Software Mod I - 55.95 Mod III - 55.95 



MX 80 Ribbon Reloads - $3.50 ea/$38.00dz. Min. 5 ribbons 



We also carry the lull line ol ADVENTURE INTL. ACORN. BIG FIVE. BRODERBUND. 
AVALON HILL. MICROSOFT. DATASOFT. MISOSYS. AUTOMATED SIMULATIONS and 
most other lino soltware at discount prices. 



SEND FOR YOUR FREE CATALOG. 
No credit cards at these low prices. Add $2.00 on all COD orders. Certified Ck/MO/COD 
shipped immediately. Please allow 2 weeks for personal checks. For extra fast service 
phone in your COD order. Prices subject to change without notice. New York State 
residents please add appropriate sales tax. 

We Oiler Great Values & Prompt Delivery — Why Not Try Us 9 



14603 25th Road, Flushing, New York 11354 

Mon-Fri10AM-9PM (212)445-7124 Sat 10 AM-5 PM 
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2710 PRINT© 960, "RADIUS ="; SR ; "KM." 

2720 NG=1 : RETURN 

2730 ' LANDING GRAPHICS, BACKGROUND 

2740 CLS 

2750 PRINT© 896, STRING$(32,176); STRIN 

G$(32,176); 
2760 PRINT@978, "LANDING SITE "; CHR$(19 

0); CHR$(189);" ON ";H$; 
2770 LG=1 : RETURN 
2780 ' DELAY LOOP 
2790 IF IC=1 RETURN 
2800 FOR J=l TO 1000 : NEXT J 
2810 ' LINE CHECK ROUTINE 
2820 L=L+1 : IF L>13 AND IG=0 GOSUB 228 

: PRINT© 960, ; 
2830 IF IG=0 RETURN 
2840 ' CLEAR INPUT LINE AND REPLACE L 

EGEND 
2850 PRINT© 192, CHR$(30) 
2860 IF LD=1 GOTO 2880 
2870 PRINT© 288, CHR$(191); " DEG. ( 

LANDING SITE)"; 
2880 PRINT© 192, ; : RETURN 
2890 ' SAVE CURRENT STATUS ON TAPE 
2900 CLS : 0$="ORBIT" 
2910 INPUT"POSITION TAPE, PRESS 'RECORD 

■ THEN 'ENTER'"; Z$ 
2920 CLS : PRINT"SAVING SHIP'S CURRENT 

STATUS" 
2930 PRINT#-1, 0$,H$,GC,RD,SR,SM,TM,XP, 

YP,XV,YV,BV,IG,LD 
2940 RETURN 

2950 ' GET PREVIOUS STATUS FROM TAPE 
2960 0$="" 
2970 INPUT"POSITION TAPE, PRESS 'PLAY' 

THEN 'ENTER'"; Z$ 
2980 CLS : PRINT"RESTORING SHIP'S PREVI 

OUS STATUS" 
2990 INPUT#-1, 0$,H$,GC,RD,SR,SM,TM,XP, 

YP,XV,YV,BV,IG,LD 
3000 IF 0$="ORBIT"THEN I=0:LG=0:JG=1:NG 

=0 :GOSUB 2330 :GOTO 390 
3010 PRINT : print"****** WRONG FILE 

3020 PRINT"TRY AGAIN" : PRINT : GOTO 29 

70 
3030 ' INSTRUCTIONS 
3040 CLS 
3050 PRINT-YOU ARE THE PILOT OF A SPACE 

SHIP IN A RANDOM ELLIPTICAL ORBIT" 
3060 PRINT"AROUND ONE OF EIGHT NEARLY A 

IRLESS PRIMARIES. YOU MUST CONTROL" 
3070 PRINT"THE TIMING, DURATION, INTENS 

ITY, AND DIRECTION OF THE ROCKET" 
3080 PRINT"BURNS SO AS TO LAND GENTLY ( 

< 1 METER/SEC.) AT THE TARGET SITE" 
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3090 PRINT" (AT DEG.) WITHOUT RUNNING 

OUT OF FUEL. YOU MAY RUN ANY" 
3100 PRINT"NUMBER OF FREE-FALL OR ROCKE 

T BURN SEGMENTS AUTOMATICALLY." 
3110 PRINT"OPERATION OF THE SPACESHIP I 

S AS FOLLOWS:" 
3120 PRINT" 1. CHOOSE PRIMARY FOR LAN 

DING. (A RANDOM ORBIT IS SELECTED)" 
3130 PRINT" 2. ENTER SECONDS FOR EACH 

SEGMENT. (MAXIMUM & DEFAULT = 60)" 
3140 PRINT" (ENTER '99' FOR HELP F 

ROM THE 'ON-BOARD COMPUTER' ) " 
3150 PRINT" 3. ENTER NUMBER OF SEGMEN 

TS. (DEFAULT = 1)" 
3160 PRINT" 4. ENTER BURN RATE, KG./S 

EC. (MAXIMUM = 100, DEFAULT =0)" 
3170 PRINT" 5. IF BURN WAS MADE, ENTE 

R THRUST DIRECTION. (TO + OR -180)" 
3180 PRINT" 6. EVALUATE DISPLAY, THEN 

RETURN TO STEP 2." 
3190 PRINT" 7. AFTER SURFACE IMPACT, 

LANDING STATUS IS INTERPOLATED." 
3200 INPUT"TO CONTINUE, PRESS 'ENTER'"; 

Z$ 
3210 CLS : GOTO 80 
3220 ' RANDOM SEED ENTRY 
3230 PRINT "IF YOU WANT A REPRODUCABLE 

INITIAL STATUS, ENTER ANY INTEGER" 
3240 PRINT" (UP TO 16777215)." 
3250 PRINT"FOR A RANDOM INITIAL STATUS, 

JUST PRESS 'ENTER'"; 
3260 RS=0 : INPUT RS : CLS : IF RS=0 RE 

TURN 
3270 IF RS>0 AND RS< 16777216 AND INT(RS 

)=RS GOTO 3290 
3280 Z$=STR$(RS) : GOSUB 3310 : GOTO 32 

20 
3290 SR=INT(RS/256) : IR=RS-256*SR : KR 

=SR/256 : JR=SR-256*KR 
3300 POKE 16556, IR : POKE 16555, JR : PO 

KE 16554,KR : RETURN 
3310 ' BAD ENTRY 
3320 PRINT"YOUR ENTRY "';Z$;"' IS ILLEG 

AL. TRY AGAIN" :RETURN 
3330 ' ENTRY 
3340 Z$= M " 
3350 Z$=INKEY$ : IF Z$="" GOTO 3350 ELS 

E RETURN 
3360 ' ERROR TRAP 
3370 E=ERR/2+l : PRINT : IF E=6 PRINT"0 

VERFLOW"; : GOTO 3400 
3380 IF E=ll PRINT"/ BY 0"; : GOTO 3400 

3390 PRINT"CODE "; E ; 
3400 PRINT" ERROR IN LINE # "; ERL 
3410 FOR 1=1 TO 1000 : NEXT I : Z$="6" 
: RESUME 1320 ■ 
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The Color Computer 
grows up 



Adding a disk system 



Color Computer 



Don Scarbcrry, Editor 



There have been many new peripherals made 
available for the Color Computer which turn this 
little wonder into much more than the simple 
game machine it was thought to be. Radio Shack 
has confirmed their original claim of added 
support by introducing disk drive capability and a 
complete DOS (Disk Operating System) contained 
in a small ROM (Read Only Memory) cartridge. 
The ROM cartridge plugs directly into the 
computer's expansion port. If you own a Color 
Computer and have been wondering what 
advantages a disk system will provide compared 
to a cassette recorder, then read on. 

The first and most obvious advantage of owning 
a disk drive is speed. Loading and saving program 
(or data files) using a cassette recorder is at best 
cumbersome. Your file must be stored on the 
cassette in sequential order along the entire length 
of the tape. If you need to load a file which is 
physically located near the end of the tape, you 
must wait for the recorder to travel past all other 
files before it can be loaded. If your file is sitting 
near the end of a C-60 cassette you will wait nearly 
25 minutes before it can begin loading. Shorter 
cassettes will help improve loading time but at the 
expense of storage space. If you use C-10 cassettes 
your maximum access time will be approximately 
0.1 to 5 minutes depending on the length and 
location of the file. That is still a long time when 
you are sitting idly waiting for something to 
happen. By comparison, a disk drive will allow 
much faster access to any file on a diskette without 
loss of storage capacity. File access time is 
measured in seconds rather than minutes. 

Storage space on a single diskette will vary 
according to your computer and disk drive 



capabilities. You may already have heard the 
expressions "single density", "double density", 
"35-track", "40-track", and "80-track". These 
terms are indicative of the amount of storage 
space provided on a given diskette by your 
particular equipment. Radio Shack has provided 
the new disk drives for the Color Computer to be 
35-track, double density. A track can be thought of 
as analogous to a groove in a stereo record. Each 
track contains 18 sectors consisting of 256 bytes 
each, or 18 x 256 = 4,608 bytes per track. One track 
is used by the disk drive for the directory (list of 
your files). This leaves 34 x 18 x 256 = 156,672 
bytes of storage on one diskette for your files. So 
what's a byte? Think of it as one letter of the 
alphabet. You can store approximately 156,672 
characters on one 35-track double-density diskette 
depending on your methods of storing files. 

In addition to increased storage space and speed 
which the disk will bring to your Color Computer, 
the TRSDOS operating system will provide many 
new commands. These commands offer much 
more power and flexibility than is found on the 
cassette-based system. The following table lists all 
the new commands available with the disk 
system. It must be noted that these are additional 
commands. You may continue to use any of the 
usual extended BASIC color commands. 

Table 1 

BACKUP the contents of the source drive to the 
destination drive. 

CLOSE closes communication to the buffers 
specified. 

COPY copies the contents of filename 1 to 
filename 2. 
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DEC — HEATH — ZENITH — PMC 

OSBORNE — OSI — INTERTEC . . . 

i 

WE HAVE 



Hardware evaluation. 




THE CONNECTION 



Connect your IBM Selectric "', 
IBM Electronic, or Olivetti 
typewriter to any Microcomputer. 



UNDER 

$600 




ESCON Products^ Inc. 
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San Ramon, Ca., 94583 
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$599. 
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$509. 




FREE SHIPPING, HANDLING & INSURANCE 
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766 Middle Hancock Road COMPUTERS 
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CVN converts a 5-byte coded string (created by 
MKN$) back to the number it represents. 

DIR displays a directory of the disk in the drive 
number you specify. 

DRIVE changes the drive default to the drive number 
you specify. 

DSKINI formats a disk in the drive number you 
specify. 

DSKI$ inputs data from a certain sector within a 
certain track on the disk. 

DSKO$ outputs string date into the sector, track and 
drive number you specify. 

EOF returns a if there is more data to be read in the 
buffer and a — 1 if there is no more data in it. 

FIELD organizes the space within a direct access 
buffer into fields. 

FILES tells the computer how many buffers to reserve 
in memory and the total bytes to reserve for these 
buffers. 

FREE returns the number of free granules on the disk 
in the drive number you specify. 

GET gets the next record or the record number you 
specify, and puts in the buffer. 

INPUT inputs data from the buffer you specify and 
assigns each data item in the buffer to the variable 
name you specify. 

KILL deletes the filename you specify from the disk 
directory. 

LINE INPUT inputs a line (all the data up to the 
ENTER character) from the buffer you specify. 

LOAD loads the BASIC program file you specify from 
a disk into memory. 

LOADM loads a machine-language program file from 
disk. 

LOC returns the current record number of the buffer 
you specify. 

LOF returns the highest numbered record of the 
buffer you specify. 

LSET left justifies the data within the field name you 
specify. 

MERGE loads a program file from disk and merges it 
with the existing program in memory. 

MKN$ converts a number to a 5-byte coded string, for 
storage in a formatted disk file. 

OPEN opens a place in memory called a buffer which 
will communicate data to and from a certain device. 

PRINT prints the data to the buffer. 

PRINT # buffer, USING format; data list. Prints data 
to the buffer using the format you specify. 

PUT assigns a record number to the data in the buffer. 

RENAME renames a file on disk to a new filename. 

RSET right justifies the data within the field name 
you specify. 

RUN loads filename from disk and runs it. 

SAVEM saves a machine language program 
beginning at first address in memory and ending at last 
address. 

UNLOAD closes any open files in the drive number 
you specify. 

VERIFY ON 

VERIFY OFF turns the verify function on and off. 

WRITE writes the data to the buffer you specify. 
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If you are only accustomed to using the cassette-based 
model and upgrade to the new disk system, you will feel 
like you have a tiger by the tail! 

Another nice feature of the TRSDOS operating 
system is that it is transparent to the operator. You are 
actually operating in TRSDOS and BASIC 
simultaneously. You won't have to continually issue 
new commands to switch back and forth from BASIC to 
TRSDOS and vice- versa. Model I or III owners will 
appreciate this feature. For example, if you wish to load 
a program from cassette and store it on disk you simply 
type "CLOAD(filename)" ENTER and then when the 
program is loaded, type "SAVE (filename)" ENTER. 
You can switch files back and forth between cassette 
and disk with absolutely no effort at all. Your programs 
may also control input/output between these two 
devices. Combine all this flexibility with the graphics 
capabilities of the Color Computer and you will have a 
very powerful system. In fact, a two-disk system 
provides more storage area than four disks did in the 
earlier Model I — and you can expand your Color 
Computer to a total of four drives! 

The TRSDOS for the Color Computer resides in a 
ROM cartridge which plugs into the expansion port. 
This causes the operating system to grab 
approximately 2500 bytes of your memory away from 
the computer. If you have only a 16K machine (13095 
bytes of actual available memory), you will have 
slightly over UK of memory available for program use 
when using the disk system. Software which formerly 
required more than 1 IK to operate will not run with the 
disk system. Upgrading to 32K is strongly advised 
when using disks. You may not feel the need for this 
much RAM initially, but as you gain programming 
experience and your programs become longer, the need 
for more memory will definitely arise. 

Another disadvantage to the color disk system at 
present is the fact that you will not be able to use disks 
and ROM cartridges at the same time. In order to use a 
ROM PAK you will have to disable the disk system. This 
may not be much of a problem for long though, because 
the port is for expansion and all that is needed is for 
some enterprising company to develop an expansion 
board that will allow multiple device connections. 

Our unit has operated flawlessly since we received it 
and we are quite pleased with it. The manual is very 
easy to follow and explains everything from setup to 
actual use in very elementary terms. Do be careful when 
hooking the ribbon cable connecting the DOS ROM 
PAK and the actual disk drive. It is easy to get the 
connector mounted upside-down because the 
illustration describing this connection is not quite clear. 

The price of one disk drive, cable and DOS ROMPAK 
cartridge is $599. The second, third and fourth drives 
sell for $399. each. The overall cost for a two-drive 
system is about the same as for a two-drive Model I 
system. 

The Color Computer disk system is one of the best 
values available for high-speed, mass-storage devices. 
If you decide to upgrade to disk, most assuredly you will 
never want to go back to a cassette-based system. ■ 
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Editor/ Assembler 
1.2 for three 

EDTASM improved for Model I 
and revised for Model III 



Model III 

The Model I Editor Assembler (26- 
2002) can be revised to operate on 
the Model III and improved for the 
Model I. 

When I loaded and ran the Editor 
Assembler the first time on my 
Model III, I really wasn't expecting 
the sign on message I received. The 
screen displayed a message that 
only Charlie Chan could have 
deciphered. The new Tandy Triple 
obviously spoke in another tongue. 

Before I sold my Model I, I had 
heard the rumors that many of 
Tandy's programs would not run on 
the Model III. Here was the proof. I 
pretended that I understood the note 
at the top of the screen and issued an 
EDTASM command. In a moment, 
a message appeared with which I 
was familiar. "Cass?" 

I had just finished repairing T- 
BUG for the Model III and knew the 
cassette routines within EDTASM 
would also have to be revised. I had 
failed to realize that in this case, the 
keyboard and video driver routines 
would have to be changed as well. 

The alterations that I made in the 
Editor Assembler allow it to operate 
on the Model III. Source tapes can be 
written or read at both baud rates. 
Thus, alterations in programs 
written originally for the Model I 
can be made. Object tapes may also 
be written at either speed. 

The first 500 bytes of the original 
program are eliminated by calling 
on ROM routines. This allows the 
program stack to be relocated out of 
the Model Ill's buffer. Owners of 
both models will be able to use lower 
case text, assuming the necessary 
hardware modifications have been 
made to the Model I. Memory size set 
on power up is honored. This change 
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was important to me because I have 
a selectric driver residing at the top 
of RAM. You may wish to preserve a 
lower case driver or KBFIX on the 
Model I. 

Other than having the Editor 
Assembler itself, you must also have 
a utility program such as Three Bug 
that can be relocated above 5CFF 
hex. 

The first step then is to load the 
monitor routine, move it to 5CFFH 
or higher, and run it. On the Model 
III, set memory location 421 1H to 
00H to select the low cassette speed 
and using the monitors Load 
command, Load EDTASM. 

The following changes are made 
in the original Editor Assembler 
program. When more than one value 
follows an address, the values are 
entered in subsequent addresses. 
The Editor Assembler keyboard, 
video and printer drivers are 
replaced by ROM routines in this 
step. Enter: 

M 4606 15 40 
M 460B ID 40 
M 4610 25 40 

M 4615 74 06 

That last change at 4615H loads 
the address of the Model III General 
I/O driver. For the Model I, the 
values entered should be C2 03. 

The original Editor Assembler 
masks out lower case letters. You 
may remove this block simply by 
entering: 

M 4649 00 00 00 00 

An unnecessary RAM check is 



performed between 4693H and 
46A1H, overwriting high memory. 
To preserve the memory size set on 
power up, insert this new code. 

M 4693 2A Bl 40 

M 4696 22 13 41 

This next step is for the Model III. 
The inverse video question mark 
replaces the cursor symbol. Model I 
users must enter zeros here. 

M 4699 21 23 40 
M 469C 36 FC 

M 469E 23 36 01 00 

To relocate the stack to the area 
vacated by the Editor Assembler 
drivers, load 44H into these three 
locations: 46B2, 46DC, 529C. 

Another change for the Model III 
owner sets the maximum characters 
to be printed per line and initializes 
the count to zero. A different value 
may be entered at 46BE. The 44H 
shown will result in a maximum 
length of 70 characters per line. 
Once again, you Model I types must 
enter zeros or use this area for your 
own initialization code. 

M 46BA 21 2B 40 
M 46BD 36 44 

M 46BF 32 2A 40 

The next set of changes replaces 
the cassette routines within the 
Editor Assembler with calls to the 
Model III ROM. Model I owners can 
use this as a guide in locating and 
replacing similar calls in their 



.Software innovation 



machine. The major differences are 
that the ROM routines in the Model 
III that read and write the leader 
and sync byte, also turn on the 
recorder motor. The blinking 
asterisks, appearing as a program is 
loaded, are a part of the CSIN 
routine in the Model III and 
therefore no special call is made for 
this function in this revision. 

The routines that are being 
replaced are located between 4318H 
and 43CDH. The changes printed in 
Table 1 are for the Model III 
computer only. The call to 0243H 
reads the header and sync byte. 
Calling 0287H writes the same 
items. Calls to 0235H and 024DH 
read and write a byte of data while 
30C0H turns off the cassette motor. 
The change made at address 
4DA6H through 4DA8 was 
originally a call to blink the 
asterisk. 

The revised Editor Assembler will 
be saved and loaded at the high 
baud rate. Therefore, EDTASM will 
be initialized to produce high speed 
source code tapes. The code in Table 
1 starting with address 4728 allows 
the Model III owner to change the 
cassette baud rate while in 
EDTASM command mode. Press 
the C key and answer the Cass? 
prompt with H or L. Before assemb- 
ling and writing the object code to 
tape, select the low baud rate. 

A final change that can be made is 
reserved for those with lower case 
capabilities. That initial sign on 
message really surprised me and I 
felt a need for revenge. The area 
within the Editor Assembler 
containing its messages starts at 
476AH. If your monitor has a Dump 
command, you can see this text. The 
last character in each message has 
the most significant bit in its 
normal ASCII code set. For 
example, an R has the ASCII hex 
value of 52. This becomes F2 when 
the most significant bit is set. If you 
decide to alter any of the text in this 
area, you must follow the same 
procedure. I changed three 
messages. The sign on now says, 
"Model III Assembler Ver. 3.2". The 
following prompts appear at 
appropriate tim-es: "CTR-80A 
Ready?" and "Ready Printer". The 
addresses and contents to allow 
these alterations are presented in 
Table 2. 



Once you have completed making 
these changes, you can punch out a 
new copy. Model III users enter M 
4211 01 to select the high baud rate, 
prepare the recorder and command: 

P 45E6 5CFF 468A EDTASM 

The corresponding entry for the 
Model I without the cassette 
revisions is: 

P 4318 5CEF 468A EDTASM 



Table 1 
Cassette Routine Changes 



45E6 


FE 


43 


45E8 


20 


06 


45EA 


CD 


42 


45ED 


C3 


DA 


45F0 


21 


A2 


45F3 


C3 


2B 


46DE 


OC 


30 


4728 


C3 


E6 


4743 


4D 


02 


4D46 


4D 


02 


4D58 


43 


02 


4D5B 


35 


02 


4D70 


35 


02 


4D79 
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4D96 
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02 


4DA6 


00 


00 


4DB4 
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02 
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4F35 
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4F3A 
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4F40 
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4F49 
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02 


59AF 


4D 


02 
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02 
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4D 


02 
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4D 
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30 
46 
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47 

45 
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48C9 


4D 


6F 


64 


65 


6C 


20 


49 


49 


48D1 


49 


20 


41 


73 


73 


65 


6D 


62 


48D9 


6C 


65 


72 


20 


56 


65 


72 


20 
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We will meet or 
beat any price 
in the U.S.A. on 





MICROCOMPUTERS 

In fact, no matter what price you see 

advertised by Texas Computer Systems, 
Micro Management, Computer Plus, 
Pan American, or any authorized Radio 
Shack dealer for TRS-80 Computers with 
pure factory installed memory and full 
warranty, we'll beat it! 

ATARI 

MICROCOMPUTERS 

We have consistently ottered the best 
prices on 

APPLE • COMMODORE VIC 20 
OKIDATA • MICROLINE 

EPSON • WABASH • MAXELL 

— plus a complete line of Diskettes, 
Monitors, Modems and other 
accessories — all at the best delivery 
from the largest inventory in the 
Northeast. 

If you're looking for the best prices in 
the U.S.A., check the others, but call 
Computer Discount of America. 

TRS-80 and Radio Shack are trademarks of Tandy Co. 



Write or call for FREE Computer Catalog 
with pictures, specs, accessories and prices. 

CALL TOLL FREE: 

800-526-5313 



Computer 
Discount 

of America 



COMPUTER DISCOUNT OF AMERICA. INC. 
15 Marshall Hill Road. West Milford Mall 
West Milford. New Jersey 07480-2198 
In New Jersey Call 201-728-8080 
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Here's the Software Secret Agent, 
trenchcoat aback, mirror shades 
reflecting the California sunshine 
beneath the brim of a battered Sam 
Spade hat. Investigative reporting 
is the name of the game and 
uncovering information is the wave 
to my surfboard. 

I am a movie buff, a cinemaphile, 
if you will. I saw Time Bandits in 
England where it was filmed and 
watched Midnight Man (an old Burt 
Lancaster movie) being filmed. I 
have seen computers represented in 
the cinema in every form 
conceivable, from the wimpish and 
slightly psychotic HAL in "2001, A 
Space Odyssey", to the overzealous, 
intent on becoming human, cyber- 
entity in "Demon Seed". But, never 
have I seen anything to compare to 
a new film called "Evilspeak". 

Picture this: A chubby, socially 
unacceptable youth is enrolled in a 
military academy where he is 
mercilessly hazed by resident 
neanderthals. He introverts and 
discovers the school computer 
(simultaneous to discovering a 
cellar full of Latin-based black mass 
bibles). 

Enterprising lad that he is, he 
cranks up a Latin translating 
database on his newly acquired 48K 
single disk drive Apple II, renders to 
English the contents of one of the 
volumes, and types in a new 
program to summon theDevillV. And 
he does itll You can bet that the 
manufacturers of our humble TRS- 
80s don't have a program that'll do 
that. Anyway, the CRT's pulsating 
energy and pentagrams and (if 
you'll pardon the pun), all hell's 
breaking loose. Our boy has 
superhuman powers bestowed upon 
him by the necromancing CPU, 
allowing him to wreak total havok 
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over his enemies, not to mention 
raising the stock of studio blood 
producers by a full eight points on 
the market. 

This blatent misrepresentation of 
the capabilities of a home computer 
is an incredible scandal, but there is 
a bright side. The Apple survived 
the three thousand degree fire that 
climaxed the film. I wonder if it is 
the same one that Apple has been 
using in their ads lately. The cat 
looks familiar. I wonder if that 
Latin-to-English database is 
translatable to the Model III. 
Hmmmmmmmm. . . 

This California sunshine is 
terrific. We took the Secret 
agentmobile south to San Diego, to a 
little shop called Dimensional 
Software in an outskirts mall. 

Dimensional Software is one of 
the many TRS-80 software/hard- 
ware shopping center locations I've 
visited this year. The interior is 
clean, well organized into 
departments, and well stocked with 
all manner of software from games 
to business. Two doors from a Radio 
Shack company store, they exist 
symbiotically, even though 
Dimensional Software sells a 
nationally advertised retrofitted 
double disk drive TRS-80 Model III. 

I found the staff to be 
knowledgeable, courteous, soft 
spoken and eager to please. It was 
refreshing to find a non-Radio 
Shack computer center that respects 
the TRS-80 as a factor in the 
marketplace. 

If you're in the Los Angeles or San 
Diego area, give these guys a try. 
They've got a dynamite gig going. 

Here's the Software Secret Agent, 
boarding a DC-10 for the return trip 
to Boston airport. It's ten below zero 
in New Hampshire, that's twenty 



degrees too cold for my boot-phone 
to work outdoors. Oh well, summer's 
coming. 

• • • 

She's long, lean and sleek, built 
for speed and high maneuverability 
in atmosphere. She carries five, 
rapid-fire L-230 medium range laser 
cannons fitted for short burst high 
energy saturation power. She's a 
combat pilot's dream come true. 

Who is this lovely lady who's 
stolen the heart of a dyed-in-the- 
wool Software Secret Agent? She's 
the planetary fighter ship from 
Adventure International's new 
arcade game called Eliminator. 

Ordinarily I don't get all that 
excited about arcade look-alikes. 
But from the moment Eliminator 
arrived, I was impressed with its 
demeanor. Even the exterior 
packaging is a cut above the norm. 
The nameless artist who labors 
endlessly to enhance the front 
covers of Scott's software has 
absolutely outdone himself with 
this one. 

The program is a pleasant 
surprise. The graphics are vastly 
superior to any currently available 
offering in this genre. The screen 
display is very nearly three 
dimensional and the execution is so 
flawless that it is difficult to believe 
that there's not a film running 
inside the CPU. 

The components of the game are 
basically similar to that of the 
popular arcade game Defender. 
There are towers on the ground 
which move in perspective. The 
stars in the background add depth 
of field. The realistically-depicted 
fighter is bi-directional. Motion is 
controlled by the arrow keys, and a 
radical change in horizontal motion 
produces a Newtonian skidding 



motion that can be fatal if 
miscalculated. 

The creepy critters that 
materialize to battle with the 
Eliminator are typical space 
invaders, dixie cups with eyes and 
lasers,' quick-witted and flawlessly 
deadly. They form from matter 
pools and attack the player's ship 
with a ferocity I've not experienced 
since the shark in Terror at Salachi 
Bay got heartburn trying to turn me 
into a cabin cruiser sandwich. 

All in all, Eliminator is a winner. 
Despite its obvious difficulty, 
Dickie, resident arcadeophile, 
dispatched the Adventure Inter- 
national high score that comes 
with the game within six hours of 
play. Judging from the noises of 
excitement he and his sidekick, 
John, were making, this one should 
be a natural for the peanutbutter 
and laserpistol crowd. As for myself, 
I enjoyed playing it. The game 
entertained me while giving me 
ideas on how to equip a new Secret 
Agentmobile. I recommend 
Eliminator wholeheartedly. It is 
slick, professional, and, without 
qualification, a blast. 

Sky Warrior, also by Adventure 
International, shares the talents of 
the invisible artist. The artwork is 
stunning. But there, the similarities 
between it and Eliminator end. Also 
commercial arcade based, Sky 
Warrior is a haphazard and 
amateurish pale imitation of the 
original. For a company to release 
an alpha-character-based spaceship 
shooting little arrows on the heels of 
a beam-shooting slick silhouette of a 
sharp fighter is inexcusable. 

Taken on its own merit, Sky 
Warrior holds up. The scenario of 
moving through the jagged 
overhanging cliffs, bombarding 
anti-aircraft bases, does work. It's 
not too hard to squeeze a good time 
out of the game as a whole. But the 
graphics are reminiscent of a 
Softside type-in, stick-man pop-dot 
flicker-arrow-go-boom that would 
have been state of the art at the time 
of Instant Software's Doodles and 
Displays package. 

Sky Warrior has speed and the 
reputation of its quarter-a-game 
counterpart going for it, but let's 
face reality. The software buying 
public has played Robot Attack with 
graphic men and Scarfman with 



very realistic ghosties. They've 
played a blue million versions of 
Space Invaders with as many 
different creepy crawlie base 
munchers, and Duel-in-Droids with 
honest-to-goodness swordfighting 
Andys. Are they going to pay a 
premium price for synchronously 
moving diagonal dots, a spaceship 
that would have Doctor Smith 
turning up his nose on a free ride 
back to Earth, and Harry Mudd 
giving up grifting? 

Yes, very likely — if for no other 
reason than despite its visual 
inequities, Sky : Warrior is not a 
ripoff. It's not a boring game, or an 
easy game, a slow, or even a bad 
game. It's just an unprofessional 
game. That, in and of itself, is not a 
fatal flaw. Tell you what ... if you 
disagree, write me and tell me. I'm 
not infallible by any stretch of the 
imagination. 

It is not like the early days of 
software production anymore. Back 
then (in the Doodles and Displays 
years), a small producer could put 
together a Lunar Lander or a 
Wumpus, get a neighborhood artist 
to paste a clip art spaceship or 
(whatever a Wumpus is) on a Xerox 
sheet, stuff it into a ziplock, buy an 
inexpensive ad in a small magazine 
and sell a couple of hundred copies 
for munchie money. The big guys 
changed that. 

Now, there are a handful of 
distributors who hold the key to 
hundreds of small stores who 
seldom buy from unrepresented 
independents. And, there are a 
handful of Big Gun Software 
companies, the Software Super- 
powers (like Instant Software and 
Adventure) who've sunk megabucks 
into multi-colored ad campaigns 
and expensive, versi-talented 
staffers whose jobs are to 
merchandise to the masses. There's 
nothing wrong with that. But with 
that national reputation comes a 
public trust, a duty, if you will, to be 
true to the customer. 

Underneath the highly polished 
ultra-slick packaging, beyond the 
clever wording of the advertising, 
had better be a solid, top-quality 
program. After all, $19.95 is too 
much to pay for a five by seven, five- 
color piece of artwork with writing 
on it — even if it IS a limited 
edition. P 



FOR TRS-80 MODEL I OR III 

AND SOON FOR THE NEW 

IBM PERSONAL COMPUTER! 



• MORE SPEED 

10-20 times faster than Level II BASIC. 

• MORE ROOM 

Very compact complied code plus VIRTUAL 
MEMORY makes your RAM act larger. Variable 
number of block buffers. 31-char.-unlque word- 
names use only 4 bytes In header! 

• MORE INSTRUCTIONS 

Add YOUR commands to Its 79-STANDARD-plus 

Instruction set! 

Far more complete than most Forths: single & 

double precision, arrays, string-handling, clock, 

more. 

• MORE EASE 

Excellent full-screen Editor, structured & 

modular programming 

Word search utility 

THE NOTEPAD letter writer 

Optimized for your TRS-80 or IBM with Keyboard 

repeats, upper/lower case display driver, full 

ASCII, single- & double-width graphics, etc. 

• MORE POWER 

Forth operating system 

Interpreter AND compiler 

8080 or 8088 Assembler 

(Z80 Assembler also available for TRS-80) 

Intermix 35- to 80-track disk drives 

Model III and IBM can read, write and run each 

other's and Model I diskettes! 

VIRTUAL I/O for video and printer, disk and tape 

(10-Megabyte hard disk available) 




FORTH 



THE PROFESSIONAL FORTH 
FOR TRS-80 

(Thousands of systems In use) 
MMSFORTH Disk System V2.0 (requires 1 disk drive, 32K 
RAM)_ For Radio Shack TRS-80 Model I or III ... . $120.05 
For IBM Personal Computer (advance order) . . . 1249.85 

AND MMS GIVES IT 
PROFESSIONAL SUPPORT 

Source code provided 

MMSFORTH Newsletter 

Many demo programs aboard 

MMSFORTH User Groups 

Inexpensive upgrades to latest version 

Programming staff can provide advice, modifications 

and custom programs, to fit YOUR needs. 

MMSFORTH UTILITIES DISKETTE: Includes FLOATING 
POINT MATH (L.2 BASIC ROM routines plus Complex 
numbers, Rectangular-Polar coordinate conversions, 
Degrees mode, more), plus a full Forth-style Z80 ASSEM- 
BLER; plus a powerful CROSS-REFERENCER to list 
Forth words by block and line. All on one diskette 
(requires MMSFORTH V2.0, 1 drive & 32K RAM) . $39.95* 

FORTHCOM: communications package provides RS-232 
driver, dumb terminal mode, transfer of FORTH blocks, 
and host mode to operate a remote TRS-80 (requires 
MMSFORTH V2.0, 1 drive 4 32K RAM) $39.96* 

THE DATAHANDLER V1.2: a very sophisticated data- 
base management system operable by non-pro- 
grammers (requires MMSFORTH V2.0, 1 drive 4 32K 
RAM) $59.95* 

MMSFORTH GAMES DISKETTE: real-time graphics & 
board games w/source code. Includes BREAKFORTH, 
CRASHFORTH, CRYPTOQUOTE, FREEWAY, OTHELLO 
& TICTACFORTH (requires MMSFORTH V2.0, 1 drive & 
32K RAM) $39.95* 

Other MMSFORTH products under development 

FORTH BOOKS AVAILABLE 

MMSFORTH USERS MANUAL - without Appendices, for 
non-owners $17.50* 

STARTING FORTH - best companion to our man- 
ual $15.95" 

THREADED INTERPRETIVE LANGUAGES - advanced, 
excellent analysis of MMSFORTH-IIke lan- 
guage $10.05* 

PROGRAM DESIGN & CONSTRUCTION - Intro, to struc- 
tured programming, good for Forth $13.05* 

FORTH -79 STANDARD MANUAL - official reference to 
79-STANDARD word set, etc $13.95* 

FORTH SPECIAL ISSUE, BYTE Magazine (Aug. 1980) -we 
stock this collector's Item for Forth users and beginners 
$4.00* 

* - ORDERING INFORMATION: Software prices Include 
manuals and require signing of a non-transferrable 
single system, single-user license. Describe your Hard- 
ware. Add $2.00 S/H plus $3.00 per MMSFORTH and 
$1.00 per additional book; Mass. orders add 5% tax. 
Foreign orders add 20%. UPS COD, VISA & M/C ac- 
cepted; no unpaid purchase orders, please. 

Send SASE for free MMSFORTH information. 
Good dealers sought 

Get MMSFORTH products from your 
computer dealer or 

MILLER MICROCOMPUTER 
SERVICES (B4) 

61 Lake Shore Road, Natlck, MA 01760 
(617)653-6136 
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Hardware modification 



MX-80 mods for Model I 

. . . without an expansion interface 



Model I and MX-80 



Robert L. Green, Atlanta, GA 



If you have a Model I with no 
expansion interface, but want to use 
the Epson MX-80 printer, this 
simple modification is for you. 

I purchased the MX-80 for the 
Admissions Office of Dekalb Area 
Technical School to replace an old 
RO-33 teletype, but the MX-80 would 
not handshake through the Radio 
Shack Printer Interface (cat. no. 
1411). I paid hundreds of dollars for 
a paper weight? A call to Jade 
(where I bought it) resulted in an 
engineer telling me he'd never seen 
it done, but someone had soldered a 
jumper to make it all work. A local 
Apple/Epson dealer said it could 
not be done. A Radio Shack 
Computer Center said it was not 
possible ... so, I had to do it! 



Put a towel on a flat surface and 
lay the printer face down (after 
disconnecting wire rack, cable, etc.). 
Use a phillips screwdriver to 
unscrew the corner screws, but leave 
them in their respective wells. Tape 
the holes (to hold the screws). Turn 
the printer back over and pull off the 
black plastic roller knob. Carefully 
pull the printer top up and to the 
right, being sure to clear the 
protruding roller stud. If resistance 
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is felt, note the colored wires at the 
base. Push them down and forward 
(to you) to release them and slide the 
printer case top off— not pulling off 
the wires in tfie process. Stand the 
top on its side and slide the back 
corner of it under the printer base for 
support. The owner's manual 
should have covered all of this, 
before, to let you check out the two 
blocks of dip switches. (See Diagram 
A.) 

Use a phillips screwdriver to 
remove the two screws holding 
down the small 3"x5" printed circuit 
(PC) board at the left rear. Cut a 3% 
inch, small diameter, insulated 
wire. Bare both ends and coat them 
with solder. Use a small common 
screwdriver to carefully pry up the 
two rectangular black pin connector 
boxes between the PC boards. Lift 
up the small PC board to expose the 
shiny, flat input pins at the rear. 

Bend one end of your jumper into 
a hook and hook it onto the farthest 
right shiny, flat, input pin connector 
(Diagram A again). Solder it. Note 
Diagram B. Solder the free jumper 
end to the bump of solder found 
above the lettering: 74LS3673B. The 
bump is above the main CPU 
(Diagram B). 

Careful folks may wish to test the 



unit by hooking up the cables, 
paper, etc., before reassembly, but I 
did not. Replace the small PC board 
and carefully push the black pin 
connector boxes together and screw 
in the two screws. 

Option 

Epson published a consumer 
bulletin for printers that 
encountered registration difficul- 
ties. You may want to take your 
printer in for the free modification 
(before you use mine) or do it 
yourself. A local dealer let me 
exchange the CPU for the three 
EPROMs kit. I popped out the CPU, 
following Epson's printed 
directions, then pushed in the three 
EPROMs and cut the jumper 
marked (Jl) to the right of the CPU. 

Slip the cover back on (watching 
to get the metal roller rod into the 
side hole). Replace the roller knob. 
Turn the unit over, remove the tape 
on the corners, and screw back the 
screws. Flip the unit back over and 
attach the cable and interface with 
the blue-coded wire to the left of the 
operator (coming from CPU, black 
box, and going into the rear of the 
printer). You now have a fully 
functioning printer at substantial 
savings of both dollars and time. 



Diagram A 



Hardware modification 

Diagram B 
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OMNITERM 

What Is OMNITERM? 

OMNITERNI is a professional communications package for the TRS-80 that allows 
you to easily communicate and transfer files or programs with almost any other 
computer. We've never found a computer that OMNITERM can't work with. It's a 
complete package because it includes not only the terminal program itself, but also 
conversion utilities, a text editor, special configuration files, serious 
documentation and serious support. 

Why do I need It? 

You need OMNITERM if you need to communicate efficiently with many different 
computers, or if you want to customize your TRS-80 for use with one particular 
computer. You need OMNITERM to SOLVE your communications problems once 
and for all. 

What do I get? 

The OMNITERM package includes the OMNITERM terminal program, four 
conversion utilities, a text editor, and setting files for use with popular computers 
such as CompuServe, the Source, and Dow Jones — just as samples of what you can 

fjndbergh Systems 



The ULTIMATE TRS-80 Terminal Package 



do for the computer you want to work with. The package includes six programs, seven 
data files, and real documentation: a 76-page manual that has been called "the best In 
the Industry." And OMNITERM comes with real user support. We can be reached 
via CompuServe, Source, phone, or mail to promptly answer your questions about using 
OMNITERM. 

What do I need to use OMNITERM? 

A Model I or Model III TRS-80, at least 32K of memory, one disk, and the RS-232 
interface, or Microconnection modem. OMNITERM works with all ROMs and DOSes, 
and will work with your special keyboard drivers. 

What will it do? 

OMNITERM allows you to translate any character going to any device: printer, screen, 
disk, keyboard, or communications line giving you complete control and allowing you to 
redefine the character sets of all devices. It will let you transfer data, and run your 
printer while connected for a record of everything that happens. OMNITERM can 
reformat your screen so that 80. 32, or 40 column lines are easy to read and look neat on 
your TRS-80 screen. It even lets you get on remote computers with just one keystroke! 
The program lets you send special characters, echo characters, count UART errors, 
configure your DART, send True Breaks and use lower case. It accepts VIDEOTEX codes, 
giving you full cursor control. It will even let you review text that has scrolled off 
the screen! Best of all. OMNITERM will save a special file with all your changes so you 



can quickly use OMNITERM for any 
one of many different computers by 
loading the proper file. It's easy to use 
since it's menu driven, and gives you a 
full status display so you can examine 
and change everything. 
"OMNITERM has my vote as the top 
TRS-80 terminal program available today" 
Kilobaud Microcomputing. June 1981. 
pages 16-19. 

OMNITERM is S95 (plus shipping if 
COD) Call for 24 hour shipment. Manual 
alone $15, applied toward complete pack- 
age. Visa. M/C, and COD accepted. MA 
residents add 5% tax. Dealer inguiries 
invited. 

Contact Lindbergh Systems for your 
custom programming needs. We are 
expert at writing software to work with 
YOUR hardware, in assembler, high-level 
language or Forth. 
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LOW-LEVEL CENTER 

TRS-80 Model l/lll 



STRETCH SUPERSTEP: New third generation Z80 simu- 

lator is the leading element of the Software CPU design base. Ani- 
mated Z80 Programming Models. Intelligent RAM Window, 
scrolling disassembler are now extended. New modules are 
FLTCUR 2-D byte oriented editor with full floating cursor and auto- 
repeat plus innovative BUFSTF user-defined buffer/window 
setup for flexible skeleton program views. Use BUFSTF to view 
large amounts of disassembled code, isolate all instances of 
selected instructions in several formats, more. Gather instruction 
frequency counts in straight-line or program-flow order for 
sophisticated analysis of subject programs and Z80 resource use. 
Many formatted transparent printer options, including screen pix 
and insiruction-by-instruction tabular listing of all active machine 
aspects. Pictorial manual gives easy intro to program operation. 
Nothing newer for byte-entry, debugging and analysis of Z80 
machine language programs. $39.95 + $2.00 shipping 

EMU 02fi: Detailed instruction-level 6502 simulator with ani- 
mated before/after 6502 Programming Models (registers, flags 
and stack) and scrolling instruction stream disassembler active in 
Single-step and 4-speed TRACE modes, also special high speed 
interpreter running over 5% actual 1 mhz 6502 processor speed. 
Have a 6502 without having a 6502, find out why the 6502 brain 
was picked by Apple. PET. Atari, arcade machines, etc. $29.95 
+ $2.00 shipping 

BALCODE 80A'. Highly interesting mid-level language for 
TRS-80 Model I. IBM's BAL (Basic Assembler Language) is an 
idealized machine instruction set currently in use on the IBM 
360/370. BALCODE 80A implements an extended BAL subset via 
a text editor and macro assembler; you write in BAL with 20 
p-registers (16 general purpose. 4 floating point) and powerful 
addressing modes, then assemble to fast Z80 code. Hands on 
introduction to BAL, source programs are highly portable to make 
your TRS-80 an IBM workalike! Includes 106 page IBM reference 
publication describing BAL. From Balcode Software. $79.00 + 
$3.00 shipping 



COMPILER 
WORKSTATION 

TRS-80 Model I and III 

Your BASIC program development 
could go faster. . . 

EDIT: Full-Screen BASIC editor with floating cursor and auto- 
repeat. More than 30 commands and functions let you var- 
iously find, change, insert, delete, replace, replicate, copy, 
move or position BASIC text at the character, string, line or 
block level. Developed in Britain by Southern Software. Mod I. 
Ill $40.00+ 1.50 shipping. 

PACKER; (Cottage Software) Editing tool will unpack, shorten, 
repack, renumber all or part of your BASIC text. The UNPACK 
segment is very useful when preparing BASIC source pro- 
grams for compilation by ACCEL2. Mod I, III $29.95+ 1.00 
shipping. 

Then your BASIC program 
could go faster... 

ACCEL2: Compiler for TRS-80 Mod I. Mod III Disk BASIC. New 
functional improvements in place to give more ease-of-use. 
quicker compilation of large programs, better chaining of com- 
piled and non-compiled programs. Size read-out helps you 
monitor code growth during compilation . REM NOARRAY option 
lets you use variable-bound arrays. Professionals note: Com- 
prehensive instructions show how to organize your compiled 
programs for resale on tape. ES/F wafer or disk. No royalties' 
Developed in Britain by Southern Software. Specify Mod lor III. 
$88.95 + $2.00 shipping. 

TSAVE: Writes compiler output to independent SYSTEM tape. 
$9.95 + $1.00 shipping. 

EXEC: Command-List Processor for TRS-80 Mod I. Prepare, 
execute, pass as many as nine parameters to lists of TRSDOS 
or NEWDOS commands and/or BASIC statements. Simplifies 
repetitive procedures such as power-up sequences, file set- 
ups, etc. Compatible with ACCEL2 compiler disk output. 
Developed in Britain by Southern Software. $22.00 + $1.00 
shipping. 
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Reviews 



Discat 

Racet Companies 

1330 N. Glassell Suite M 

Orange, CA 92667 

Model I/III 32K or 48K-$50 

Discat is a utility program 
designed to aid the computer owner 
in creating an index of disk- 
program location records capable of 
giving the following information: 

— Program names and name 
extensions 

— Diskette number where 
program is stored 

— Program location on diskette 
(front or back side) 

— Length (in granules) of each 
stored program 

— Free disk space on each diskette 

According to the excellent user's 
manual for Discat, a 32K system 
can hold in excess of 800 program 
location records. There can be up to 
nine indexes in each catalog of 
indexes, individually named by the 
user. The program library could 
contain over 7200 programs. 

In a 48K system, the Discat utility 
can provode over 1900 program 
location records in each of the nine 
indexes. This catalog of indexes 
could contain data for over 17,000 
programs, depending on how many 
tracks your disk drives can handle 
and your available disk space. 
Seventeen thousand program 
location records could fill over five 
diskettes with data. 

Placing all of the 800 (or 1900) 
program records in an index in 
memory at the same time allows 
extremely fast access to the location 
of a particular program on disk. 

Discat is written in machine code 
and, according to the user's manual, 
is capable of: 

— Loading an index file 
containing over 800 records into 
memory in less than 15 seconds 
(1900 in less than 25 seconds). 

—Searching for the location of a 
specific program in less than three 
seconds (for an 800 entry file). 

— Automatically keeping track of 
free space available for each of your 
diskettes. 

— Changing the active drive from 
zero through three for use by 
systems with more than one disk 
drive when in the automatic 
directory update mode. 



—Allowing manual program/ 
disk number entries for those 
special cases such as foreign 
operating systems (similar to CPM, 
VDOS or other diskettes without a 
normal directory system) where the 
diskette number and contents need 
to be added to the index and cannot 
be read from the directory of the 
diskette automatically. 

— Providing for printed copies of 
the indexes in the catalog, either in a 
single- or double-column format. 

— Sorting the index by either 
program name or number. Sorts 800 
entries in 25 seconds or less, 1900 in 
65 seconds or less. 

— Deleting either program or 
entire disk in a matter of seconds, so 
caution must be used with this 
mode. This mode does provide some 
very good prompts to help prevent 
needless losses. 

— Allowing the user to clear the 
current index from memory using a 
special utility section in order to 
start a new index without rebooting 
and also providing an exit from the 
program. 

— Saving the file to the same 
index or selecting a new index after 
file maintenance is finished. 

—Allowing up to 100 disk 
numbers in each of the nine index 
files. It is possible to use up to a 
maximum of 9999 different disk 
numbers. By making up different 
indexes on other disks it is possible 
to build a library of programs on 
numbered disks that could be 
arranged in ten 1000-diskette 
catalogs. 

Discat is completely menu driven 
and is therefore easy for anyone to 
use. It also gives plenty of warnings 
where errors could be costly. 

This review is not intended to 
describe all that Discat can do, but 
to give the reader some insight into 
its potential. At the time we started 
using it, we had over 1500 programs 
and had made no attempt to 
organize them by subject. It took 
approximately two hours to catalog 
and the speed at which it finds any 
given program is fantastic. We 
chose to make one index of our 
master's (original copies) which has 
been extremely useful. 

Our only complaint is not a 
serious one. One of the other 
programs we used had the 
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capability of "comment lines" in the 
hard copy of the catalog. That is not 
possible in this program, but its loss 
is more than compensated for by the 
capacity, speed and ease of use of 
Discat. 

Although we did not test this 
program with a large variety of 
operating systems, we did find it to 
be compatible with most operating 
systems, including NEWDOS80. It 
is not compatible with double den- 
sity at this time. 

This program is definitely a 
"must" for anyone with a varied 
program library. 

John and Nikki Newman 



TRS-80 Assembly Language 
by Hubert Howe, Jr. 
Prentice Hall Books 

186 pages, hardbound $9.95 

I cut my teeth on Bill Barden's 
TRS-80 Assembly Language 
Programming. It is a painless and 
simplified tour through the 
wonderland of Z80 programming 
for TRS-80 users. It has some 
deficiencies though, such as no 
mention of ROM calls, disk I/O, or 
interfacing BASIC and machine 
code via the USR function. Floating 
point is mentioned in passing, but 
not enough to give any decent 
understanding of the subject. Still, it 
is a good book. 

Hubert Howe's book, TRS-80 
Assembly Language Programming, 
on the other hand, has chapters on 
all of the above deficiencies. It is 
clear and very easy reading, 
although not long enough to be 
exhaustive. 

It starts out, innocuously enough, 
with a basic introduction to 
terminology: ROM, RAM, video, 
binary, hexadecimal, ASCII and 
number formats. It then goes on to 
Z80 architecture with an 
introduction to the registers. One 
nicety is the explanation of the 
addressing modes presented in table 
form; a feature lacking in most other 
books. Thus, the wayfaring 
beginner can easily find out which 
addressing mode is which when he 
needs to reference a command. 

Chapter two and the following 
one deal with an overview of Z80 
instructions. Howe's approach 
seems a little scattered to my 
methodical tastes. The approach is 
taken to avoid panicking the 



students. 

Chapter four discusses the stack: 
What a stack is, what it does, and 
the commands we have for it. This 
includes not only PUSH and POP, 
but also CALL and RET. 

Chapter five has a brief memory 
map for the TRS-80 and discusses 
some ROM routines. A nice point 
about this is that it tells which 
registers the ROM routines will use. 
The map is not exhaustive, but it 
really needn't be. For most 
assembly language programming, 
you cannot use many of the ROM 
routines. Keyboard and video 
routines are there, and knowing 
how to use them is helpful. The 
cassette I/O routines are discussed, 
as well as some other miscellaneous 
I/O routines. The entry points for 
the BASIC reserved words are 
presented as well. 

After this 50-page introduction, 
which is eminently readable, 
chapter six begins the prog- 
ramming information. Here we are 
told how to use the editor/ 
assember. Radio Shack's manual is 
not as plain to read as some people 
would like (although it reads like a 
Superman comic compared with the 
AIM 65 editor/assembler instruc- 
tions). This chapter is an account of 
how it works, complete with a 
sample program. It makes sense of 
the manual and when there is no one 
else around, it's nice to have a clear 
reference. 

The next chapter talks about 
getting numbers - binary, hex and 
decimal - in and out of the computer. 
Back when I first got into this sort of 
thing, I was concerned about 
getting my numbers out. What can I 
do with this fancy program if I 
cannot get the answer out of the 
machine? This section is parti- 
cularly good as an introduction to 
the video display of numbers, in 
both hex and decimal. The routines 
in this chapter cover input as well as 
output of numbers. 

Next, Howe talks about arrays, 
tables, and other simple data 
structures, followed by a discussion 
of the movement of data. A few 
methods for storing data in. tables 
are given. The movement "of data is 
straightforward and he discusses 
searching for specific data in blocks 
of memory. 

Chapter ten, Arithmetic 
Operations with Integers, includes 
the two's compliment binary 
representation. This is important, 
although its utility is more 
theoretical than practical with the 
advent of hexadecimal monitors. 
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Don't miss a single issue of the new Eighty 
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mailed every Friday by First Class Mail. This 
is the only publication designed for personnel 
in the TRS-80* industry, including manufac- 
turers, distributors, dealers and computer 
users. The Eighty System Newsletter is 
compiled and edited by Ken Gordon, producer 
of the National TRS-80- Show, the Eighty/ 
Apple Show, the NJ Microcomputer Show, 
and publisher of the Amateur Radio Equip- 
ment Directory. Here is valuable information 
in professionally prepared format about TRS- 
80* hardware, software, peripherals, trends in 
the industry, and latest news. In addition, 
each weekly issue contains brief digests of 
articles related to the TRS-80* system 
appearing in over 100 computer related and 
general interest publications. This bibliography 
will save you both time and money in keeping 
up with articles in print on the TRS-80* 
computer system. The Eighty System News- 
letter is a must for all active TRS-80* users, 
plus anyone involved in any way with the 
manufacturing, distributing or retailing of 
TRS-80* products. 

Subscribe today: Mail the coupon with 
your check for $39 for the next 52 weekly 
issues (sent First Class Mail that's only 
75C per week.) If tor any reason you are 
not satisfied with the Eighty System 
Newsletter — we will refund the undelivered 
portion of your subscription. 



KENGORE CORPORATION 

3001 Route 27 
Franklin Park, NJ 08823 
(201)297-2526 

□ Enclosed is my check for 
$39 for the next 52 issues 
of The Eighty System 
Newsletter (sent First Class 
Mail). 

Name 

Company 

Address 

City _ 



State . 



Zip. 



"TRS-80 is a Registered Trademark of Tandy 
Corporation/Radio Shack Division. 



.-I 

May, 1982 93 




TRS-80 
MODEL I 

DISK 

INTERFACING 

GUIDE 

$5.95 

POSTPAID 

FIRST CLASS 

(United States Only) 

$7.95 Foreign Airmail 
(U.S. Funds) 

Send to: 

80-U.S. Journal 

3838 South Warner St. 

Tacoma, WA 98409 

(206) 475-2219 

Dealer Inquiries Inuited 

TRS-80 is a registered trademark ot Tandy Corporation 



Reviews 



Send- 



Copies of the Guide 



Check Enclosed 

Visa or MasterCard 



Exp. Date - 
Signature . 

Name 

Address 

City 

State 



. Zip- 



A Division of 80-Northwest Publishing, Inc. 



ataa 



The various addition and 
subtraction commands are noted 
and discussed in a reasonably 
complete fashion, including 
multiple precision arithmetic. 

Chapter 11 is on floating point 
numbers and BCD (Binary Coded 
Decimal). The chapter is a bit short 
(pun intended) and talks about the 
basics. It ought to be longer to really 
deal with the subjects. The format 
used for TRS-80 floating point is 
briefly talked about. More 
information would be nice, but for a 
beginner, the discussion is well 
done. BCD is discussed in greater 
detail. Rightly so, in my opinion, 
since it is both easy to implement 
and understand. 

Chapter 13 is devoted to 
multiplication and division. 
Routines for both eight and 16 bit 
multiplication are presented here in 
such a manner as to make some 
fairly difficult concepts trans- 
parent. 

The chapter on cassette I/O is 
excellent. There is even a routine 
that reads machine language object 
tapes, gives the name, starting, 
ending and transfer addresses, 
complete with comments. Tape 
formats are discussed. Also here is a 
routine that will read and store non- 
standard tape formats in memory 
where they may be examined. In my 
opinion, this chapter is much better 
than any other I have seen on the 
subject. 

The chapter on USR routines is 
fairly good. It discusses a variety of 
concerns for the USR-user; such as 
accessing the routine, returning 
from the routine, and passing 
values back and forth. Hybrid 
programs that sort numbers and 
strings are presented. 

The place where the book shines 
is the chapter on disk I/O. Few 
books on assembly language 
programming even mention the 
subject. Little known topics such as 
choosing the drive and writing and 
reading bytes are discussed. Topics 
such as reading a sector or track 
are included and all routines include 
comments. Excellent! 

The last chapter deals with disk 
files. The directory is discussed 
along with the different types of file 
formats. Although much of this 
information appears in other books, 
it is nice to have here. The FPDE 
(File Primary Directory Entries) are 
mentioned and decoded, and the 
information is presented in an easy- 
to-read table. Information on GAT 
and HIT sectors, passwords, and the 
math formula used to get the 2-byte 
HASH codes are all there. This 



chapter is the best part of the book. 
Howe's book is an excellent place 
to start for someone wishing to learn 
more about his or her TRS-80. It is 
not the book on assembly language, 
but is well worth the price. 

Bruce P Douglass 

Planetoids 

TRS-80 Model I/III 

16K tape $19.95 

32K disk $20.95 

. Adventure International 

Box 3435 

Longwood, FL 32750 

(800) 327-7172 

Planetoids, written by Greg 
Hassett and marketed by Adventure 
International, is a high speed, multi- 
option version of Asteroids. In its 
basic form, it offers the arcade 
player the same challenge as does 
the original Atari arcade version, 
minus the sound effects and the 
excellent high resolution graphics. 
Then again, an Asteroids game 
machine costs $5000 and eats 
quarters all day. The graphics in 
Planetoids are excellent and the 
lack of sound effects may actually 
be less distracting to some players. 

Placed in the center of an infinite 
field of asteroids, you must use your 
ship's laser cannon to destroy as 
many of the asteroids as you can, 
avoiding collisions with the 
obstacles. As you blast the gigantic 
rocks, the impact of the laser splits 
them into smaller fragments. Your 
score depends not only on the 
number, but also the size of the 
asteroids that you annihilate. The 
smaller targets are worth more 
points than the larger ones. 

To make it more interesting, alien 
spaceships attempt to eliminate 
you. You can rotate your ship into 12 
different positions, use your 
thrusters, fire your cannon, or 
attempt hyperspace escape. 
Hyperspace is used as a last ditch 
effort to escape enemy fire or 
collision with an asteroid. You may 
find that hyperspace relocates your 
ship in a worse location than where 
you were (on an asteroid or enemy 
ship). 

There are five different types of 
enemy spaceships that attack your 
ship. Most are fairly easy to destroy, 
the exception being the dreaded 
Zoron Battle Star. This one fires 
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multiple, high-speed missiles very 
accurately. Your only hope is to 
Mast him before he gets a salvo off. 
This ship is also the only one that is 
not destroyed by collision with the 
asteroids. As your score increases, 
so does the frequency of the 
appearance of the enemy ships, the 
number of missiles fired by the alien 
ships, and the number of asteroids. 
It becomes increasingly challeng- 
ing as your points mount. Scores of 
over 100,000 are uncommon. 

What sets this version apart from 
the rest is that there are eight 
options that can be activated during 
the game. The first option freezes 
the action indefinitely so that you 
can rest your fingers, answer the 
telephone, or tend to other trivial 
matters. Practice mode allows you 
to play at the higher difficulty levels 
offered by high scores. 

You can abort the game at any 
time by pressing "2" and no one will 
ever know. You can save and load 
the top ten high scores to tape with 
options "3" and "4". There is a high 
speed option available that doubles 
the speed of the asteroids. "Cruze" 
mode slows the asteroids down to 
almost a stop, allowing you to 
practice using the thrusters. 
"Dogfight" eliminates the asteroids 
completely so that you can fight the 
alien ships without worrying about 
hitting the asteroids. You may also 
combine dogfight with the practice 
mode, giving you a real challenge. 

This game is probably the all-time 
favorite around our house. It has all 
of the features that make for many 
hours of entertainment. The top ten 
scores are posted after every game, 
giving the holders a reward for their 
skill and bravery. It does not become 
as time worn as some of the other 
games available for the TRS-80 and 
the multitude of extra features give 
it an edge over competing versions. 
Jim Klaproth 

Invasion Orion 

Automated Simulations 

P.O. Box 4247 

1988 Leghorn Street 

Mt. View, CA 94040 

1-800-824-7888 

$24.95 cassette or disk plus 

$2.00 s/h Model I/III Level II 

Some programs achieve instant 

notoriety. Others, equally good, 



don't receive half the attention they 
deserve. One such program is 
Invasion Orion, by Automated 
Simultations. Although it's been out 
for two years, it's only recently been 
getting the advertising space that 
its qualities merit. 

Invasion Orion is the solitaire 
version of Starfleet Orion, a game in 
which two players maneuvered 
various types of starshipsin combat 
against one another. In Invasion 
Orion, the computer itself becomes 
your opponent. While it is by no 
means as capable as a human 
opponent, the resulting games are 
always an interesting challenge. 
The newest versions of Invasion 
Orion also allow you to play against 
a human opponent. 

Invasion Orion is available either 
as a 16K tape, or as 32K disk. 
Invasion Orion now comes in a box 
which contains the program tape or 
disk, and an instruction booklet 
that's a wonder to behold. The 
instruction booklet (i.e., the "Battle 
Manual") practically deserves a 
review all by itself. Obviously 
prepared with great care, the 
operating instructions are clear and 
explicit. The Battle Manual 
explains the historical background 
against which the various scenarios 
are played. 

Briefly, Invasion Orion recounts 
the struggle of the human Orion 
colonists against the alien Klaatu 
invaders. Each scenario consists of 
a short story that sets up the action, 
the characters involved, the type of 
ships on each side, and the positions 
of the ships and planets in space. All 
of the variables relating to the ships 
and planets are changeable — i.e., 
you can create new scenarios at will. 
All of the short stories are well 
written; no mean feat in itself. 

As an added bonus, the Battle 
Manual also contains design notes, 
notes on tactics, a discussion of the 
decision, models used by the 
computer, and a short survey of the 
specific algorithms involved. Older 
versions of the game also included 
complete listings of the programs. 
All in all, an insightful mix of 
material that I've read with 
fascination several times. 

The program tape consists of 
three parts. Side One contains two 
programs. The first is the Game 
program, which is used to play the 
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The Aspen Software Company Spelling Checker. 
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QRAMMATik 

Beyond Spelling Checking 



THE ONLY COMPLETE 
PROOFREADING PACKAGE 

FOR ALL CP/M, MS-DOS, 
AND TRS-80 WORD PROCESSORS 

We'll match Proofreader with any other 
spelling checker on the market. It has a big 
38,000 word expandable dictionary, and can 
check even your largest documents in under 
four minutes. Proofreader looks up every 
word, and does not use less accurate root 
word analysis like some others. Full inter- 
active correction is standard on CP/M and 
TRS-80 Model II systems, and is a low cost 
option for the TRS-80 Model I/III. 

Spelling checking alone is not enough! No 
one else has anything like Grammatik! It 
analyzes your document for common typos, 
punctuation errors, misused phrases, and 
poor writing style. Grammatik is receiving 
rave reviews from both critics and users. 
Bob Louden in InfoWorld (12/7/81): 
"Grammatik is a surprisingly fast and easy 
tool for analyzing writing style and punctu- 
ation. If you are currently doing original 
writing on a word processor, you should 
consider this product." Eric Balkan in 
The Computer Consultant: "I'm impressed 
with the imagination that went into this 
product." A user: "Thanks for making my 
life easier!" 

Grammatik and Proofreader are compatible with all 

CP/M. MS-DOS (including IBM PC), and TRS-80 word 

processors. 

Current CP/M formats: 

standard 8". NorthStar, Omikron TRS-80. 
Please call or write for details of minimum system 
sizes, and availability of additional disk and operating 
system formats. Shipping costs included. 
Please specify your system configuration when 
ordering. Dealer inquiries invited. 
MS-DOS versions scheduled for March 1982 release. 



Proofreader Grammatik 
CP/M. MS-DOS $129.00 $149.00 

TRS-80 Model II $99.00 $99.00 

TRS-80 Mod. I/Ill $54.00 $59.00 

(Model I/III interactive correction option - $30.00) 



Trademarks: CP/M: Digital Research; TRS-80: Tandy Corp. 
Proofreader. Grammatik: Aspen Software Co. 
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various scenarios. The second is the 
Builder program which is used to 
create the scenarios and save them. 
Side Two of the tape contains the 
data for the first two scenarios. 

If you want to play the remaining 
eight scenarios in the Battle 
Manual, you have to first create 
them with the Builder program and 
then save them on a separate data 
tape. This is not difficult, and the 
saved copy can be used over and 
over again. The disk version has all 
ten scenarios already prepared and 
ready to use. 

To play the game, you first load 
the Game program. Then you 
position your scenario data tape on 
the recorder. The Game program 
will request the name of the scenario 
to be played, the side you wish to 
play on, and the desired level of 
experience — i.e., difficulty. You can 
direct the forces of the Klaatu if 
you're feeling particularly 
heartless, and the computer will 
command the Orion ships. The 
computer isn't always very good 
playing the human side. In some 
scenarios, it's not practical at all, 
but the Battle Manual is usually 
quite explicit about this. 

The action takes place on an 
invisible grid 62 units in width and 
34 units in height. There is no depth 
dimension, except that two or more 
ships may occupy the same location 
without colliding. The ships appear 
as lighted bits. Each is identified by 
either a letter or a number so you 
won't get confused and shoot at one 
of your own ships. There are up to 
nine ships on each side. 



A table at the back of the Battle 
Manual lists the various types of 
starships and their characteristics. 
There are 34 types in all, ranging 
from fighters to dreadnoughts. The 
ships differ in many ways, such as 
drive strength, beam power, number 
of launch tubes, number of missiles 
and torpedos, armor thickness, and 
total energy available. The 
computer may be queried at any 
time during the course of the game 
regarding the current status of any 
of your ships. It will not reveal the 
status of its ships until the scenario 
is completed. 

If a ship is hit by a beam, it 
flickers. Missiles appear on the 
screen as asterisks; torpedos as 
blinking bits that move slowly 
across the screen. If a ship is 
destroyed, it explodes at the end of 
the turn in a shower of lighted bits. 
Several of the scenarios make use of 
tractor and pressor beams to move 
ships around. 

I have played Invasion Orion for 
several months now, and I have 
never found it boring. There are 
some minor problems. Torpedos 
launched along the boundary of the 
playing grid take a great deal of 
time to move along their trajectory. 
You can only launch one torpedo at 
a time, no matter how many launch 
tubes you have available. Scenario 
names appear to be limited in length 
to 15 characters, but there is no 
mention of this in the Battle 
Manual. If you create a scenario 
with a name that is too long, it will 
not be loaded correctly by the game 
program, and your entire effort will 



be wasted. 

But this is quibbling. Invasion 
Orion literally lets your imagina- 
tion run wild. Frustrated science 
fiction writers take note! If you ever 
tire of the scenarios given, you can 
create new ones at any time. This 
program is a bit more expensive 
than some, but I feel that the 
investment is well worth the many 
hours of enjoyment that it will 
bring. 

Dan Cataldo 




"Hey Harold! The program says PRINT@, 
not PAINT®" 
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Voyage of the Valkyrie 

Model I/III 16K cassette $34.95 

32K disk $39.95 

Advanced Operating Systems 

450 St. John Road 

Michigan City, IN 46360 

(800) 348-8558 

We had just returned to Castle Sjaelbjerg after 
defeating the defense forces of both Castle Jammer and 
Castle Vakker. The battles were decisive and the 
victories complete, with no quarter asked and none 
given. I was pleased to have our leader promote me to 
Sergeant in our small, but proud, air force. As chief 
gunner and navigator, I was called before the king's 
own defense advisor and given the latest map of the 
known world. He told me then that this map had cost the 
lives of not less than 20 expeditionary groups and that 
even though there were several copies, none was 
complete. Somewhere, in one of the other castles, was a 
map showing the way to at least two more castles 
beyond the eight which we know and had mapped. 

My job was to obtain that information. Success meant 
promotion, fame, and wealth; defeat would only offer 
death as its reward. Refueling completed, we lifted off 
and headed south from our home. 

Almost immediately, we were intercepted by a 
squadron of the infamous Fugloy air force. We were able 
to kill only one or two of them. We managed to hide 
above in the clouds before our energy reserves were 
depleted to the point that our defense shields would 
have failed. We continued on to our first destination- 
Castle Torden, each of us wondering if we would be the 
next crew to disappear in our long search for the 
mysterious missing lands and their reported riches. 

With just a little imagination, Leo Christopherson's 
latest master-piece, "Voyage of the Valkyrie," can be as 
adventuresome as any other game currently available 
to TRS-80 users. The basic object of the game is to find 
and conquer all 10 castles in the imaginary land of 
Fugloy. Each castle is defended by a group of ruthless 
birds whose primary pleasure in life seems to be to 
deprive you of your own precious life. Before you can do 
battle you first must find them, and this is the first stage 
of the game. 

The game package on diskette comes with 11 pages of 
instructions. After reading and digesting the rules of 
the game, you are ready to begin mapping the land of 
Fugloy. You are also provided with about 10 maps of the 
game board you will be playing on. Your starting 
position is marked, but that is about all that is marked. 

The mountains you may run into aren't marked. 
Neither are any of the fog banks (all the castles are 
located on islands). It is up to you to determine which 
paths are safe to fly and which are roads to destruction. 
Once you have a completed map, you may begin a 
campaign of conquest, although by this time, you have 
probably been smashed against seen and unseen 
mountains, lost at sea, or shot down by the Fugloy air 
force. 

The first thing you notice about this time is that you 
only have a map of eight enemy castles, not the ten 
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A perfect trio — The Hayes Stack Smartmodem, 
TRS-80, and the Automated Communication Exchange 
software. Now you can have access to other computers 
over the telephone line, as well as, time sharing 
systems and information utilities nationwide. 

The Hayes Stack Smartmodem features auto answer 
& auto dial, RS232C compatibility, seven LED 
indicators, an audio monitor, accepts over 30 different 
commands, and is programmable in any language. 

The unique A.C.E. software package allows you to 
receive & transmit ASCII files from your completely 
unattended TRS-80! 

For a sophisticated, high performance, data 
communication system select A.C.E. and the Hayes 
Stack Smartmodem. 




^ 



Hayes Stack Smartmodem $249 
A.C.E. disk software for 48K Model l/lll $79 
************** Special — Limited time only! ********** 
A.C.E. Disk software $39 w/Smartmodem purchase 

ACE COMPUTER PRODUCTS OF FLORIDA, INC. 

1640 N.W. 3rd Street 

Deerfield Beach, FL 33441 

Data (305) 427-6300/Voice (305) 427-1257 
MC/VISA accepted FL res. add 4% sales tax 
Circle # 53 Freight incl. (UPS ground— Cont. USA) 
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ACTION GAMES 

The fastest growing producer of computer games for 
your 6809 has the products you have waited for!! 



Reviews 
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ARCADE GAMES FOR 
THE COLOR COMPUTER 



ft BE 



*iS 



Sfik 



Fast paced action • Super Hi-Res Graphics 

Dynamite sound effects • Runs in 16K of memory 

These games will astonish you with their Detail and Quality. 

They set a standard for others to follow. 



— ADVENTURES — 

Calixto Island • uUje SJlack Sanctum 

Highly acclaimed by reviewers • Challenging situations 

Fast, efficient machine language • Runs in 16K of memory 

Save game in progress 



Adventures on 5'/i TSC FLEX disc (specify 6800 or 6809) ea. $24,95 

Both adventures on single disc S39.95 

Adventures lor color computer ea. S19.95 

Color Berserk for color computer ea. $24.95 

Cave Hunter for color computer ea. $24.95 

Shipped prepaid in continental U.S. California residents, please add 6% tan 



VISA 



— MORE COMING SOON - 
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MARK DATA PRODUCTS 

23802 Barquilta, Mission Viejo, CA 92691 • (714) 768-1551 

TRS B0 IS A TRADEMARK OF TANDY CORP. 



COLOR COMPUTER SOFTWARE 



EDITOR ASSEMBLER 
DEBUGGER 



$ 6 



95 



CCEAD: This 8K Basic Program supports cassette dies, has full cursor control, line in- 
sertion/deletion, and much more Two pass assembler supports lull 6809 instruction set 
& addressing modes, lists to screen or printer Debugger allows memory examine/mo- 
dify, program execution II not delighted return within 2 weeks for a full refund You gel 
fully commented Basic source & complete instructions Requires Ext Basic & 16K ... 
CASSETTE $6 95 

DELUXE TERMINAL PROGRAM 

COLORCOM/E: This terminal program has everything 1 PLUS it's in a convenient plug- 
in cartridge LOOK at these features 



• Complete upload & download support 

• Selectable baud rale & parity 

• Full or half duplex 

• Write to any printer or cassette 

• Supports ANY serial printer 



• Automatic or manual capture 

• Selectable Capture characters 

• Exchange Basic programs 

• Word mode means no split words 

• And much, much more 



Use with CompuServe. The Source, etc Talk to other Color Computers Works with any 
model Color Computer & full duplex RS232 modem CARTRIDGE S49 95 

STRIPPER: The Stripper takes off all that excess fat in your Basic Programs Three valu- 
able commands: ( 1 ) Delete Remarks: (2) Pack Lines. 13) Delete Spaces Fully automatic, 
is not fooled by GOTO s. GOSUB's. etc Your programs will run faster and lake up much 
less memory CASSETTE S7 95 

BOOTSTRAP: This Cartridge automatically loads and executes Basic programs from 
cassette at power-up Can't fail Ignores data files. Machine Language liles. or Basic fries 
that have errors For those programs that have to run' CARTRIDGE S34 40 

RS232 EXPANSION CABLE: With this cable you can conned 2 devices at !he same 

time to the RS232 part of your Color Computer Great for printer & modem 

RS232 Cable $20 00 

CUSTOM CARTRIDGES: Put YOUR Basic program into a convenient ROM Cartridge 
ll'seasy 1 Runs instantly at power-up. frees up memory Use for Ad displays, schools, etc 
Call or write for into FROM S4 1 65 



Send check, money order. 

or Visa/MC Number: 

Include $1 for postage and 

handling: Visa/MC Phone 

for fast service 
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promised by your manual. Despair not, you will have an 
opportunity to locate the last two once you have 
captured the first eight. Yes, more mapping expeditions 
are yet to come. That is the last hint I will give away. 

As we have come to expect from 037's past efforts, the 
animated graphics are superb. The birds of each castle 
are depicted both flapping their wings to climb for 
altitude and with wings extended as they soar down 
toward you. As many as six or eight of them may appear 
on your display before you kill them all off. Each one 
will dodge your fire and getting them into the moveable 
cross-hairs on your weapon system can be a really tough 
job. That comment leads me to my only real complaint 
about the game: the fire control and aiming system. 

The sights consist of a vertical and horizontal line of 
dashes that can be controlled separately or as a pair 
with the buttons of the number pad, or just the number 
keys if you do not have a number pad. This presents 
somewhat of a problem in trying to watch the screen 
and remember where your fingers are. You must watch 
the screen or you will surely be killed. Practice has 
helped me over this problem. Joysticks would have been 
nice, but no mention is made of the program supporting 
any joysticks, and I don't have any to try out (got to get 
one, just as soon as Someday shows up on my calendar). 

Mr. Christopherson is probably best known for his 
animated graphics used in combination with well 
developed musical effects. He hasn't neglected the audio 
aspect of this game at all. There are respectable sound 
effects during the action portions of the game, and he 
also gives you the option of having selected classical 
pieces played during the breaks in the action. The 
option is given so that those without sound capability 
would not have to sit and stare at an unmoving screen 
while some of Richard Wagner's operas are played. 

If you hook up your external amplifier speaker and 
respond "Y" to the question "Sound?", you will be 
greeted with the March from Tannhauser as you begin a 
game. "The Ride of the Valkyrie" is played each time 
you capture a castle. If you are killed during the game, 
another selection from "The Valkyrie" is played at your 
funeral. I will let my wife testify to the quality of the 
musical selections. When I first fired up the game disk 
and it began playing the march through my Radio 
Shack telephone listener, she came back to the computer 
room saying, " I know you don't have an organ back 
here." I think that speaks well enough for the music. A 
demonstration at the Midwest City Radio Shack 
Computer Center brought the comment that it was 
probably as close to two voices as you could get with the 
setup. 

There are ten levels of difficulty to choose from. The 
differences lie in the number of birds that will be 
defending each of the castles. More birds mean more 
trips between your home base for refueling before any 
given castle can be defeated. This results in a longer 
game and a greater possibility that you will run out of 
power during a battle, or out of fuel when trying to 
return to base. Either condition is, of course, fatal. 

During play, the only "fault" that I noticed was that 
my rate of fire decreased as the number of attacking 
birds increased. This is not really noticed until you are 
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under attack by four or more birds and does not detract 
much, if any, from the game. 

The packaging is nice. The diskette has booted 
without problem each time (although I am using a 
backup created with Super Utility Plus). The instruction 
manual is of good quality and the instructions cover the 
theme, objectives, and rules of the game completely. The 
disk is usable on both the Model I and the Model III 
computers. Model III users must first CONVERT the 
diskette files to a TRSDOS 2.2 diskette. Instructions for 
this are in the manual as are instructions for those who 
purchased the cassette version. 

I would recommend this game as a MUST to have in 
any library. It requires the player to have the strategy 
planning ability of Risk, the digital dexterity of a piano 
virtuoso, and the patience of the sphinx. The rewards 
are hours of challenge, frustration, and a full color 
poster from the distributors when you find all ten 
castles. This is not a game you will master at one or two 
sittings — and those sittings will probably be hours long. 
It is addictive . . . and GREAT. 

Jerry L. Latham 




DISK DRIVE WOES? 
PRINTER INTERACTION? 
MEMORY LOSS? 
ERRATIC OPERATION? 

Don't ^ — o 

Blame The 
Software! 

Power Line Spikes, Surges & ^^ ISO-2 

Hash could be the culprit! Pat ""•^•'^ 

Floppies, printers, memory & processor often interact! Our 
patented ISOLATORS eliminate equipment interaction AND curb 
damaging Pbwer Line Spikes, Surges and Hash. Guaranteed! .-(. 

• ISOLATOR (iSO-1) 3 filter Isolated 3-prong sockets; integral 
Surge/Spike Suppression; 1875 W Maximum load, 1 KW load 
any socket $69.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; (6 
sockets total); integral Spike/Surge Suppression; 1875 W Max 
load, 1 KW either bank $69.95 

• SUPER ISOLATOR (ISO-3) similar to ISO-1 except double 
isolation & Suppression $104.95 

• SUPER ISOLATOR (ISO-1 1) similar to ISO-2 except double 
isolation & Suppression ■ $104.95 

• MAGNUM ISOLATOR (ISO-17) 4 Quad Isolated sockets; For 
ULTRA-SENSITIVE Systems $181.95 

• CIRCUIT BREAKER, any model (Add-CB) Add $9.00 

• CKT BRKR/SWITCH/PILOT (-CBS) Add $17.00 

AT YOUR MasterCard, Visa, American Express 

DEALERS ORDER TOLL FREE 1-800-225-4876 

(except AK, HI, PR & Canada) 



££2 Electronic Specialists, Inc. 

171 South Main Street. Natick. Mass. 01760 

Technical & Non-800: 1-617-655-1532 
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In Texas, Orders, 

Questions & Answers 

1-713-392-0747 



INDUSTRIES, INC' 

21969 Katy Freeway 
Katy (Houston) Texas 77450 



To Order 
1-800-231-3680 
800-231-3681 



SAVE BIG DOLLARS ON ALL TRS80® HARDWARE & SOFTWARE 

TRS-80® by Radio Shack. Brand new in cartons delivered. Save state sales tax. Texas residents, 
add only 5% sales tax. Open Mon-Sat. 9-6. We pay freight and insurance. Come by and see us. 
Call us for a reference in or near your city. Ref: Farmers State Bank, Brookshire, Texas. 



WE OFFER ON 
REQUEST 

Federal Express (overnight delivery) 

Houston Intercontinental Airport 
Delivery, Same Day Service 

U.P.S. BLUE- Every Day 

References from people who have 
bought computers from us probably 
in your city. We have thousands 
of satisfied customers. WE WILL 
NOT BE UNDERSOLDI 

ED McMANUS 












In stock TRS-80 Model 
II and III 



No Tax on Out of Texas Shipments! 
Circle # 57 

Save 
10% 15% 

OR MORE 

We Specialize in 

Overseas Shipments 

TELEX: 77-4132 (FLEXS HOU) 



WE ALWAYS 
OFFER 

NO extra charge for Master Card or Visa 

We use Direct Freight lines. No long waits 

We always pay the freight and insurance 

Toll free order number 

Our capability to go to the giant TRS-80® 
Computer warehouse 5 hours away, in 
Ft Worth, Texas, to keep you in stock. 

® TRS-JO e e Registered Tndemert of Tendy Corp. 



JOE McMANUS 
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Can You Create Letters Like The Above 
In 4 Keystrokes . . . 

And Ha vt A Word Proctssor Print Ttttm Just At A Rtgular Lttfttr Or Flit? 
If Not, It's Tlma To Explore GEAP. 

GEAP Stands For Oraphlci Editor And Programmer. 

Depending On Your Hardware & the GEAP Package You Choote, You Can Create Diagram t, 
Figures, Flyen, Potters, Letterheads And Artwork With Ease. 

Using GEAP Does Not Require Basic Programming Knowledge, However We Have Facilities To 
Allow Programmers To Create Screen Formats And Program Documentation Within Their 
Programs With Ease. 

We Offer GEAP In Modular Form. You Con Get It All At Once Or Purchase It In Pieces As Your 
Needs Or Hardware Grows. 

I Hi | ^" I ■ ^^grammmr 

FLEXIBILITY, EASE OF USE, AND EASY FUTURE EXPANSION IS 
WHAT GEAP IS ALL ABOUT. 

GEAP Rtgular Facilitii.i — 16K-48K Dill, Stringy, or CaiMtto Supports 

Samplt Commtndi & Facllltlti In Tht Bulc GEAP Package: 

MODES: Alphanumeric, Graphic!, Singl* Graphic Pix«U Can B* Intermixed. FrM Stylt Drawing, 

Create Compoiitet From 2 Qr More Drawingl, Reverie Graphic Plxell (Selectively), Graphic Block 

Movit, Graphics Keypad, "Paintbrush", Magnification, Rotation, Save ScrMn As Basic Program 

— ASCII Compatible, Comprtssod, Or String Format. 

OPTIONAL MODULES & PACKAGES: 

MODULI 1 — More rotation. Magnification, & Other Powerful Commands. 

MODULES 3-4 — letterset Modules. Instant Utters, No Drawing Required. This Is How We 

Created The "GEAP" Cube Letters In 4 Keystrokes. 

MODULI S — EPSON Printer Support Module. Now Non-Programers Can Use The EPSON 

MX-IO To Print Their GEAP Creations — Posters, Flyers, All With Epson Quality. 

OIAP 4tK DISK — You Get Module M, & Additional Disk Related Features. Expansion 

Modules Run Via Menu Selections. If You Have The Hardware, This Is The GEAP For You. 

NIWSCMPT Support Package — All Of The GEAP 48K DISK Commands, Plus Facilities To 

Interact With NewScript. Now The Perfect Marriage, Word Processing & Graphics Processing. 

Requires Current NewScript Update. 



25.W 



45.W 
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Expansion Module 1-4 1 6.99 
NewScript 99.99 



Rtgular GEAP 
GEAP 48K 

California Add Sales Tax 

When Ordering, List System & Peripherals 

J F CONSULTING 

74-355 BUTTONWOOD PALM DESERT, CA. 92360 

(714) 340-5471 

Epson MX-80 it o trademark of Epson America NewScript is a trademark of ProSoft. 




PRIZE WINNING 

CHESS 



SFINKS 3.0 (New) 

Prize winner in Paris in the 1981 Microcomputer 
Chess Championship; Sfinks 3.0 is the fastest and 
strongest chess program ever written! 

FEATURES: Book Openings, Chess Clock, Thinking 
on Opponent's Time, Infinite Levels of Play, and 
Ruthless Playing Ability! 

32 K cassette or disk only «39 
SFINKS 1.81 

Prize winner in San Jose in the latest (1980) U.S. 
Microcomputer Chess Championship; Sfinks 1.81 
beats Sargon II, Mychess and Gambiet 80. Easy to 
use with many convenience features. 

32 K cassette or disk now only Z4 

Please specify cassette or disk and Model I or III. 
INCLUDE $2. 00 SHIPPING AND HANDLING. 

WILLIAM A. FINK 

P.O. BOX 5912 

LIGHTHOUSE POINT, FL 33074 
Exceptional Dealer Discounts Available. 
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Olympic Decathalon 

Model I, 32K Disk $29.95 

Microsoft, Inc. 

400 - 108th Ave. N.E. 

Bellevue, WA 98004 

(206) 454-1315 

Olympic Decathalon, by Timothy Smith of Microsoft, 
has to be one of the all-time greats in the TRS-80 lineup 
of gaming software. More than just a simple game, it is a 
cleverly designed simulation of the Decathalon, the 
ultimate test for an athlete. 

The program is available on either disk or cassette, 
but only the disk version was tested. The package 
consists of one diskette and a 48-page instruction 
manual. The diskette may be backed up once. It is then 
rendered uncopiable by normal means. A replacement 
diskette may be obtained for $7.50 from Microsoft. After 
backing up the original, the disk is booted and then a 
spectacular graphics display dazzles the user. 

Each event is presented in order, with one or two 
athletes competing at the same time. The computer puts 
contestants in random order so that if more than two are 
competing, the same two contestants do not compete 
against each other in all of the events. The first event is 
the 100-meter dash. The screen displays an oval track, 
complete with start and finish lines. The runners are 
depicted with two black squares on the white track. The 
starting gun is displayed, and when the "go" flag 
appears, the runners dash toward the finish line as the 
elapsed time indicators keep track of each runner. False 
starts are disallowed and will start the race over. After 
each event is over, the standings are displayed. 

The next event is the long jump, which is displayed as 
a runner on a white line at the bottom of the screen with 
a small break that represents the take-off line. It takes 
much coordination to control the jump and keep from 
committing a foot fault or a face fault. 

The shot put is cleverly displayed with the upper torso 
of a man and his arm. The up-arrow and left-arrow keys 
are pressed in unison to propel the shot upward and 
outward. It is difficult to score well in this event and 
split second timing is involved. 

The high jump is similar to the long jump, except that 
a crossbar is displayed in front of a foam rubber landing 
pit. The contestant attempts higher and higher jumps 
until all players are eliminated. This one takes good 
coordination and timing also. 

The 400-meter dash is similar to the 100-meter dash, 
only one complete lap is run. It becomes fatiguing for 
the fingers, just as it does for legs in the real thing. 

The 110-meter hurdles is my favorite event. A single 
runner is displayed on a flat track with one meter 
markings. The hurdles are at various distances. The 
runner is very life-like and the animation is excellent. 
This event takes good timing to prevent knocking down 
the hurdles. 

The discus throw is one of the most difficult to master, 
exceeded only by the pole vault. The discus must be 
released at precisely the right time in order to keep it in 
bounds. High scores come only with hours of practice. 
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The pole vault requires more skill than any other 
event, both in the real world and in this simulation. 
Each contestant must make a running approach with 
the arrow keys, plant the pole in the small vault box, 
raising to a handstand on the pole, and then releasing 
at the apex of the vault to clear the bar and land in the 
foam landing area. 

The final events are the javelin throw and the 1500- 
meter run. The javelin thrower runs up at a constant 
speed to the arc line, tilting the j avelin as he approaches 
the line. The javelin must be released before the runner 
crosses the line and at the proper angle to get good 
distance. This event takes a lot of practice to get good 
scores. 

In the 1500-meter run, two runners compete on the 
oval track again. This time, the runners are controlled 
by pressing four keys that control up, down, right and 
left. It is a little tricky to round the far curves using this 
system, as two keys must be pressed simultaneously. 
Sometimes, the runner gets stuck on the track because 
the player presses the wrong key. At least your fingers 
don't get tired from "running" as in the other running 
events. 

Olympic Decathalon is a lot of fun to play, as well as 
being entertaining and educational. My keyboard gets a 
real workout from all of the athletes around the house. 
Tim Smith deserves a lot of credit for this magnificent 
creation. This is the type of program that really shows 
off the capabilities of our wonderful little micro 
machines. 

Jim Klaproth 

Crunch, Crumble and Chomp 

Model I, 16K tape or 32K disk 

$29.95 

The Program Store 

P.O. Box 9609 

4200 Wisconsin Ave. NW 

Washington, D.C. 20016 

(800) 424-2738 

After playing several million games in which I had to 
attack alien monsters, I was getting tired of doing all of 
the killing. I wanted to be the monster for a change! 
Well, along came Epyx to the rescue! Finally, a 
company has created a game that will allow me to do a 
little ravaging of my own, and permit me to be the 
monster against all of the other "good guys", this game, 
perhaps a revolutionary one, is called "Crush, Crumble 
and Chomp", appropriately enough, since those three 
verbs are what this exciting game centers around. 

One of the major differences in this game besides the 
reversal of roles, is that it is written almost entirely in 
BASIC. That came as sort of a shock to me since most 
"professionally made" games I had ever seen were in 
machine language. Crush, Crumble and Chomp is not a 
real time arcade game, so BASIC is allowed. However, 
this makes for some rather slow action on the 
computer's part. Plan to spend a lot of time if you want 
to successfully finish this game. 

After loading in the game, setting the memory size to 
31166 and using the CLOAD statement, I was ready to 
go. I entered the command RUN, and the title page 
appeared. Following that, an option list came up on the 
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MANAGEMENT 

SYSTEMS 

SOFTWARE 



TRS-80 
Model l/lll Model II 

$125 $175 


125 
100 


175 
150 


100 
100 


150 
150 



Business Programs 



Proforma Cash-Budget 
Proforma Income 

and Balance Sheet 
Lease- Purchase Decision 
Business Analysis Package 

(12 individual programs) 
Procurement 



Educational Programs 

College Enrollment 

Projection 100 150 

Gradebook 50 100 



All programs on disk with extensive documentation. 
Send for <i brochure which fully describes the programs. 

MANAGEMENT SYSTEMS 
SOFTWARE, INC. 

5200 Brittany Drive #1006 

St. Petersburg, Florida 33715 

Phone (813) 864-4347 
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AEROCOMP DDC 

WITH DOS + 3.3D 



$139.95 

$179.95 



ATHANA DISKETTES 



THE FINEST DISK AVAILABLE! ALL DISKETTES HAVE AFACTORY 
INSTALLED REINFORCED HUB. 



BOX OF 10 SGL SIDE DBL DEN 5 1/4" 

10 PLAIN ATHANA SGL SIDE DBL DEN 5 1/4" 

PLASTIC LIBRARY CASE 



$29.95 
$22.00 
$ 3.50 



LAZY WRITER 

THE BEST WORD PROCESS- 
ING SYSTEM AVAILABLE FOR 
THE TRS-80*! 



MODEL I 

or 
MODEL III 



$169.95 



LDOS 5.1 

WITHOUT A DOUBT THE MOST 
POWERFUL DISK OPERATING 
SYSTEM AVAILABLE FOR THE 
TRS-80*! 
MODEL I 

or $159.95 

MODEL III 



PERCOM DATA SEPARATORS 

WHILE THEY LAST ONLY $24.95 



TERMS: ALL PRICES INCLUDE UPS GROUND SHIPPING. ADD S1.50 FOR COD. ALLOW 
2 EXTRA WEEKS FOR PERSONAL CHECKS. WE ACCEPT VISA AND MASTER CARD. 
•TRS-80 is a trade mark of the Tandy Corp. 
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PO BOX 5744, KENNEWICK, WA 99336 
(509) 582-9759 
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1306 S. 56th St. 

Tacoma, WA 98408 

(206) 473-4704 



COLORFILE — A menu driven mail list system designed to be 
used with or without a line printer. Options allow the user to 
create a file, review the entire file, view a single listing, update, 
save to cassette, enter from tape and more. Color Computer 
16K w/ ext. BASIC $24.95 

LIBRARY-50 — An extensive collection of 50 useful, 
educational and business programs designed toaid the student, 
homeowner, business person and educator. Includes programs 
for math, spelling, investment, mail list, etc. Mod I/III/Color 
Computer 16K ext. color BASIC $39.95 

LDOS 5.1 — The ultimate in operating systems for Model I/III. 
Model I/III $117.00 

ELIMINATOR — A new adventure in machine language for 1-2 
players (10 mins.) with sound and graphics. Model I-III 16K 
tape $17.95, 32K disk $22.95 

COMPUTER MOUSE— Four games: Pillbox, Block, Pinball, 
Computer Mouse. 4K color, 32K tape only $19.95 

MODEL I-III— Upgrade your 16K Model I and Model III to 
48K. Complete kit and assembly instructions. First 16K kit 
$39.95, 32K kit $79.95 

STAR TREK 3.5 — Boasts some impressive graphics, realistic 
sound, 3-dimensional galaxy, animated visual displays and a lot 
of detail. Includes an extensive manual of "Trek" knowledge. 
Color Computer 32K w/ ext. BASIC tape $19.95, Model 
I/III 16K tape $14.95, Model I/III 32K disk $19.95 

VISA, Mastercard, C.O.D. Accepted 

TRS-80 is a trademark of the Tandy Corporation 
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FREE 

business software 
directory 

• Radio Shack's Model I, II, III. 

• Heath's MBASIC and HDOS 

• CPM: Xerox, Alto... 

• IBM Personal Computer 



'IDM2 is GREAT !" 



■publisher of 80- US 



" (GL) superior to either the Osborne (SBSG & Taranto) 
or Radio Shack... MAI L-X has a greater capacity . .. 
more flexible than (R.S.)" 

-columnist of 80-microcomputing 

" imperceptively fast. . .(DBMS) is a good and reliable 
workhorse" -publisher of Interface Age 



Data base manager, integrated accounting package 
(AR, AP, GL & Payroll), inventory, word proces- 
sing, and mailing list. Compare and be selective ! 
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Micro Architect, Inc. 

96 Dothan St., Arlington, MA 02174 
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screen. In the option list, I could choose from six 
different monsters, five objectives and four cities. With 
all of these options, there are over 100 different games 
within one program! I believe that this feature, along 
with many others, help make up a well-balanced 
simulation. 

There are five different objectives to the game. The 
first is known as "balanced". In this objective, I can 
score for anything I destroy. Following this is the "killer 
monster", in which a few points may be obtained by 
destroying buildings, and a great deal of points for 
killing humans. (This game can get rather violent.) The 
third one of the list is "combat machine." That gives a 
few points for smashing things and a great deal for 
destroying the army (in case the monster is anti-draft!). 
"Destruction" mode gives a large number of points for 
destroying bridges and buildings, and relatively fewer 
points for humans. Last, there is "survival" mode, 
which is probably the most basic— stay alive. The 
longer the monster survives, the more points are scored. 

I was particularly impressed by the option of chosing 
a city. The four given are New York City, Golden Gate 
(San Francisco area), Washington D.C., and Tokyo. All 
of these have different areas, and all four maps are 
included in the very complete documentation. 

After completing these three decisions, I press the 
ENTER key, and the data begins to load in. Once this is 
complete, the game begins. I always make sure that my 
amplifier is hooked up, because there is sound in this 
game. Though it's not the best I've ever heard, it still 
adds a lot to the game and should not be ignored. 

The screen fills up quickly with a variety of graphics 
and text. Filling up most of the screen is a section of land 
and water (depending on the city I am in). Of course, the 
area displayed is not the entire city, but only a small 
section of it. The maps show the starting point of land 
and amphibious creatures, so that I know where to 
begin my path of terror and destruction. 

Of course, there is a wide variation with each of the 
monsters as to how much potential I have to destroy, 
and what commands I can use to destroy. However, 
some of the more common possibilities are to (C)rumble, 
(B)reath fire, and (O)bliterate. Some of the more 
specialized commands for different monsters include 
(U)ltrasonic scream, (T)ail, (P)aralyze, and (F)ly. While 
playing the game, I may hit the number sign (#) at any 
time to check my current score, and may continue 
playing until I am destroyed or starve. 

I would recommend Crush, Crumble and Chomp to 
any owner of a Model I or III cassette or disk system who 
enjoys simulations, or is just sick of being the good guy 
However, to the arcade game lover, this program is not 
for you. It's a little too slow, and doesn't' quite offer the 
action of, say, Galaxian or Alien Defense. Therefore, my 
recommendation is restricted, but my respect for the 
program and the programmer is high. The program is 
very well done, the graphics (for all they are worth) are 
utilized, and the documentation is hilarious, but 
informative and complete. Perhaps Wang Lew and I 
could start a movie. 

Tim Knight 
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Tandy topics 



Ed Jugc, Director, Computer Merchandising, Tandy Corp. 
1500 One Tandy Center, Fort Worth, TX 76102 



You've heard me discuss many 
times, the fact that we can't repair 
modified TRS-80s. We reserve the 
right to void your warranty if a unit 
has been opened or modified. We 
can't be responsible for non-Radio 
Shack parts installed, etc. 
Officially, our policies have been 
pretty much as stated. 

Unofficially, we've allowed our 
service center personnel to 
determine when special cases 
warranted special handling. We 
ended up with some inconsistencies, 
though, where one repair facility 
would agree to work on a unit after 
another facility had refused. The 
good news is that we think we've 
learned quite a bit about what we 
can do effectively, and what we 
can't. 

About the first of March, a letter 
went out to all of our service centers, 
giving them specific guidelines on 
what to do with TRS-80s which 
aren't completely "stock". Since it 
will undoubtedly make a lot of you 
very happy (and since I think it 
shows a real effort on the part of our 
support operations management to 
increase our level of service), I'd like 
to tell you about these guidelines. 

Up front, let me say that there are 
some "maximum parts/labor 
charges" for certain completely 
stock equipment. Those charges will 
not apply to units which are "non- 
stock" in any way. With that caveat, 
we'll proceed. 

First of all, let's look at the case of 
RAM chips. Those of you with 
"stock" TRS-80s containing Radio 
Shack chips: we will replace only the 
defective chips we find, not a whole 
set. If you've installed "foreign" 
RAMs, and we find one or more of 
them defective, the service center is 



still required to replace a complete 
set or none. They will, however, call 
and give you the option of doing it 
yourself or having us do it. There 
will be a checkout fee charged for 
our time, even though no service is 
performed. 

Foreign Disk Drives 

We have said many times that we 
can't work on Model Ills which 
contain non-Radio Shack drives. 
Well, our folks tell us that they will 
accept such units for service . . . 
partly! This means that if the drives 
work properly, we will simply 
overlook them. If the drives are at 
fault, we will disconnect them, 
check or repair the "stock TRS-80" 
portion of your computer, and let 
you handle any drive problem with 
the vendor or the dealer who 
installed them. 

I still issue a strong warning to 
the non-technical reader. This 
leaves you in the dangerous position 
I've described before, that Radio 
Shack will guarantee the operation 
of our equipment, as the drive 
vendor may guarantee his drives. 
But, you'd better be sure someone 
guarantees that they will work 
together, unless you have the 
knowledge and equipment to do it 
yourself. Now for my sales pitch. A 
few freight bills or "figure it out as 
we go" repair bills by a third party 
can more than eat up your savings. 

Modifications 

This one's a bit harder. If a 
modification doesn't appear to be 
hurting anything, we'll disregard it. 
If we can't properly check out the 
unit, or if the modification seems to 
be causing the problem, we'll ask 
your permission to remove it. If you 
decline, you'll pay only the checkout 



fee. Otherwise, we'll remove it, 
return the parts to you, and effect 
repairs. 

There is one big "gotcha". When 
there are "cuts and jumpers", or 
damage to the board such that our 
repair people back here in Fort 
Worth won't accept it for re- 
building on an exchange basis. If 
your computer qualifies, then your 
only option may be to repair it 
yourself, or authorize us to install 
new circuit boards on a non- 
exchange price basis. 

Our repair people will always 
return any non-Radio Shack parts, 
whether you request them or not. 
We've always done this if you 
requested it when you brought the 
unit to us, but some of you asked 
only when you picked your 
computer up . . . after the parts had 
been thrown out or mixed up with 
other defectives to the point that 
they could not be identified. 

There are a couple of other clauses 
in the new policy that you should be 
aware of. If our people feel that the 
computer poses any kind of safety 
hazard to the service technician, 
they may refuse to service it at all. 
Our after-service warranty will 
specifically exclude the operation of 
any non-Radio Shack parts or 
modifications which we leave 
installed. Also, TRS-80 equipment 
containing non-Radio Shack parts 
or modifications cannot be covered 
by our maintenance agreements. 

Having opened, modified, or 
installed your own parts, no longer 
automatically excludes Radio 
Shack service on your TRS-80. It 
can, however, cause that service to 
cost you more. A trip to our repair 
center will not necessarily assure a 
working computer if your non-stock 
parts are faulty. See you in June. ■ 
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Color Computer. 



High-rcs graphics for 
the Color Computer 

Generate alphanumeric characters 
in high- resolution mode 



Color Computer 



Richard Tangeman, Arkansas State University, AR 



The high-resolution graphics capabilities of Radio 
Shack's Color Computer are impressive when compared 
with other machines in its price range. One problem in 
applying this power is that it is not possible to mix high- 
res graphics and ordinary text on the same screen. We 
present here a short, easy-to-use subroutine, written in 
BASIC, which allows the display of commonly used 
characters on the graphics screen in PMODE 4. To see 
which characters are available, see Figure 1 or execute: 

FOR 1=32 TO 95:PRINT CHR$(I);:NEXT I from the 
direct mode. 

Any string built from the available characters may be 
displayed starting at any point on the graphics screen. 
To set up the subroutine array, execute GOSUB 915 at 
the beginning of your main program. When a string is to 
be displayed, load it into A$, set the horizontal and 
vertical tab values HT and VT, and execute GOSUB 
800. HT should be an integer value 0-39, and VT an 
integer value 0-15, where columns are numbered left to 
right and rows numbered top to bottom. The subroutine 
does not check to see whether these values are in range. 
The values of HT and VT are, however, saved by the 
subroutine in order to allow the use of these variables as 
loop counters in the calling routine. Thus, the code: 

A$="?":FOR HT=0 TO 39: FOR VT=0 TO 15:GOSUB 
800: NEXT:NEXT 

may be used to fill the screen with question marks, 
column by column. (Warning: This will take about 20 
minutes!) 

The characters are built in the usual 5x7 dot matrix 
and stored, one byte per row, in the string array A$( ). To 
see how this is accomplished, consider the question 
mark, CHR$(63). 

In each row, the five available dots are numbered zero 
to four from left to right. In the top row, we want bits one 
and two to be turned on, and 2fl+2f2 = 6. in order to 
avoid using control characters for row storage, we add 
64 to this, obtaining 70, and store the first row as "F", 
which is CHR$(70). In the next row, bits zero and three 
are to be set, so we use CHR$ (64 + 2 f + 2 f 3) ="I". 
Continuing in this manner, we get "FIHDD@D". This 
resides in A$(31) and in general, A$(K) holds the coded 
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rows of CHR$(K+32) as K ranges from zero to 63. 

With an understanding of this technique, the 
character set may be redesigned as desired, or extended 
to include, for example, the lowercase alphabetic 
characters. 

It is also possible to use this routine to display rough- 
but-readable strings in the lower-resolution graphics 
modes. To see the effects of this, replace line 20 in the 
listing with: 20 PMODE 3,1. 

Although a few characters are rather badly botched, 
most strings (particularly those involving only 
alphanumeric characters) are still easy to read. 

PMODES 2, 1 and even zero, may also be used, with 
character quality declining as expected. 



Figure 1 

A screen dump of the characters generated with 

this program. 



l"#tlXft , < >♦+*- . •01234 56783 i KOI 
BABCDEFQHiJKinNQPQRSTyVMMYZlSJt* 



Program Listing 
High-Res Graphics on the Color Computer 

Note: The underscore character in the DATA 
statements of this listing must be replaced with a left 
arrow (obtained with SHIFT-UP ARROW on the Color 
Computer). The right open bracket is obtained using the 
SHIFT DOWN-ARROW and the backslash is obtained 
using the SHIFT-CLEAR keys. With these conventions, 
you should have no trouble entering the correct code in 
the DATA statements. —Ed. 

10 GOSUB 915: REM LOAD CHARACTER ARRAY 

20 PMODE 4,1 

30 PCLS 

40 SCREEN 1,0 

50 HT=6:VT=3 

60 A§="AVAILABLE CHARACTERS:" 

70 GOSUB 800 



.Color Computer 



75 HT=0:W=6:A$="" 

80 P0RI=32T095:A$=A$4CHR$(I):NEXT 

90 GOSUB 800 

100 GOTO 100 

800 SH=HT:SV=VT:REM SAVE TAB VALUES 

805 FOR N=l TO LEN(A$) 

810 I=8*HT:J=12*VT 

815 SP$=MID$(A$,N,1) 

820 REM SP$ IS THE CHARACTER WE WILL 

PRINT 

825 GOSUB895:REM GET THE DATA FROM A$(# 

) INTO U$ 

830 REM U$ IS A STRING OF 7 BYTES 

835 FOR JO0 TO 6:REM 7 ROWS 

840 T$=MID$(U$,JC+1,1) 

845 GOSUB 910: REM SET THE PROPER BITS I 

N KC 

850 FOR IC=0 TO 4:REM 5 BITS EACH RO 

W 

855 IF ((KC)AND(2"IC))>0THENPSET(I+IC,J 
+JC) 

860 REM ~ DRAW THE CHARACTER " 

865 NEXT IC:NEXT JC 

870 HT=HT+1:IF HT=32 THEN HT=0: VT=VT+1 

875 NEXT N 

880 HT=SH:VT=SV:REM RESTORE TAB VALUES 

885 RETURN 

890 REM SUBROUTINE TO SELECT THE PROPER 

ELEMENT OF A$(#) 
895 T=ASC(SP$) 
900 U$=A$(T-32): RETURN 
905 REM SUBROUTINE TO DECODE THE ARRAY 
A$(#) INTO BINARY 
910 KC=ASC(T$)-64:RETURN 
915 DIM A$(63) 

920 REM A$(I) IS THE BINARY CODE FOR CH 
R$(32+I) 

925 DATA@@@@@@@, DDDDD@D, [ [@@§@@, JJ_J_JJ 
, J_A_P_J/ SSHDBYY, FIEBMIV, DD@@@@ @ , DBAAAB 
D,DHPPPHD 

930 DATA@DN_ND@,(aDD_DD@,(a@@(aHHD,@@(a_@@@ 
, @@@@@XX, PPHDBAA,NQYUSQN, DFDDDEN,NQPNAA 
_, NQPHPQN, HLJI_HH 

935 DATAjy^PQN/NAAOQQN^PPHDBA^QQNQQN 
,NQQ~ PQN, eDDQDDS, @DD@DDB,HDBABDH,@@_@_@ 
@ , BDHPHDB, FIHDD@D 

940 DATA@OIHOIO,mQ_QQQ,OQQOQQO,NQAAAQN 
, OQQQQQO # _AAOAA_,_AAOAAA, NQAAYQN 
945 DATAQQQ_QQQ, NDDDDDN, \HHHHIF, QIECEIQ 

/ aaaaaa_,qCuqqqq,qsuuyqq / nqqqqo^,oqqoaa 

A,NQQQQY\OQQOEIQ 

950 DATANQANPOJS,J}DDDDD,QQQQQQJN,QQQQJJD 

, QQQQUYQ, QQJDJQQ, QQJDDDD ,_PHDBA_ 

955 DATAFBBBBBF,AABDHPP,LHHHHHL,DNUDDDD 
,@DBOBD@ 

960 FORI=0TO63:READA$(I):NEXT 

965 RETURN ■ 



CONVERT YOUR TRS-80 MODEL-I INTO A 

DEVELOPMENT SYSTEM 

Now you can develop Z-80 based, stand-alone devices such as games, robots, 
instruments and peripheral controllers, by using your TRS-80 as a development system. 
The DEVELOPMATE plugs into the expansion connector of your TRS-80 and adds 
PROM PROGRAMMING and IN-CIRCUIT-EMULATION capabilities to your 
system (with or without expansion interface). 

Complete instructions and sample schematics are included to help you design your 
own simple stand-alone microcomputer systems. THESE SYSTEMS CAN BE AS' 
SIMPLE AS FOUR ICs^ onsTTL circuit for clock and reset, a Z-80, an EPROM, and 
one peripheral interface chip. 

When the In-Circuit-Emulation cable is plugged 
into the Z-80 socket of your stand-alone system, 
the system becomes a part of your TRS-80: You 
can use the full power of your editor/assemblers 
debug and trace programs to check out both the 
hardware and the software. Simple test loops 
can be used to check out the hardware, then the 
system program can be run to debug the logic of 
your stand-alone device. 

Since the program is kept in TRS-80 RAM, 
changes can be made quickly and easily. When 
your stand-alone device works as desired, you 
use the Developmate's PROM PROGRAMMER 
to copy the program into a PROM. With this 
PROM, and a Z-80 in place of the emulation 
cable, your stand-alone device will work by itself. 

The DEVELOPMATE is extremely compact: Both the PROM programmer and the 
In-Circuit-Emulator are in one small plastic box only 3.2" <5.4". A line-plug mounted 
power supply is included. The PROM programmer has a "personality module" which 
defines the voltages and connections of the PROM so that future devices can be 
accommodated. However, the system comes with a "universal" personality module 
which handles 2758,2508(8K). 2716,251 6(16K). 2532(32K). as well as the new elec- 
trically alterable 2816 and 48016I16K EEPROMs). 

The COMPLETE DEVELOPMATE 81, with software, power supply, emulation 
cable, TRS-80 cable, and "universal" personality module, is ONLY S329! 
The PROM PROGRAMMER is available separately for ONLY S239. 



ORION INSTRUMENTS 

1 72 Otis Avenue, Dept 6 , Woodside. CA 94062 

(415)851-1172 

Master Charge and Visa phone orders accepted. 

California residents please add 6% sales tax. 
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OUICTK 

TRS-80# 
Model 
I/III 




CUBE 

Level I I 
16 K 



Guaranteed to solve any Rubik's 
Cube <TM) or triple your money 
back. Enter 54 color -faces of 
cube or let program set up 
random pattern to be solved. 
Program run can be inter upted 
to allow user to enter his/her 
own moves. Interesting program 
Send *19.95 plus Sl.50 postage & 
handling to: 

ALPHA QUEUE SYSTEMS 
Dept. C 

F=". O- Box 20SS5 
E>«fcl 1 as,, TX -7SS20 

Texas residents add 5% <*1.00> 
sales tax. Checks only please. 

# Trademark of Tandy Corp. 

TM Trademark of Ideal Toy Corp. 
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COMPUTER CASSETTES 
100% ERROR-FREE 




LENGTH 


12 
PACK 


24 
PACK 


C-05.. 


690 


590 


C-10.. 


790 


690 


C-20.. 


990 


890 


• Fully Guaranteedl 

• World's Finest Media. 

• Custom Storage Case, 

Each. 


Add 20C 




• UPS Shipping, $3.00 per pack 
^jj(\ For Orders Only 



\tP 1-800-426-4747 
Extension 480 



MICRO-80™ INC. 

S 2665 BUSBY ROAD 
OAK HARBOR. WA 98277 
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The 

Lawyer's 

Microcomputer™ 

A Newsletter for Lawyers 
Using the TRS-80* 

• Articles for Lawyers 

• Law Office Applications 

• Lawyer Information 
Exchange 

• Software Reviews 

• Hardware Reviews 

• Advertisements Directed 
to Lawyer Users 

• Technical Tips 

• Letters and Suggestions 

• And Much More 

A New Monthly Newsletter 
For Lawyers 

Send $28 For A 
One Year Subscription 

The Lawyer's Microcomputer™ 

Post Office Box 1046 
Lexington. S. C. 29072 

Circle # 67 
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Notes 



Here are some short tips which will help you to understand the mechanics 
of converting HEX numbers to their decimal equivalent. 

Remember that in HEX: 

A= 10 
B = ll 
C = 12 
D = 13 
E = 14 
F = 15 

Whenever you see a HEX number and need to convert it to decimal, don't 
panic. Just simply invert the number and follow the format described below. 
You should have no trouble determining the equivalent decimal number. 
Assume you have a number like FF01H where the H signifies that this 
number is in hexidecimal. 



HEX Number 

1 



F 

F 



Multiply By 

1 

16 

256 

4096 



To Obtain 

lxl =1 

0x16 =0 
15x256 =3840 
15 x 4096 = 61440 



As a final step, add all of the decimal numbers to the right of the equal sign 
in the third column to obtain: 

1 



3840 

+61440 



65281 

Therefore, FF01 HEX is equivalent to 65281 decimal. If you have a HEX 
number with only three digits, say F01H, then there simply won't be a 
number to be multiplied by 4096. 

Likewise, for a two-digit HEX number. Here, the last two digits will be 
missing and so there won't be multipliers. The first digit will be multiplied by 
one (1) and the second digit will be multiplied by 16. Add up the resulting 
numbers and the result will be the decimal equivalent. 

This method will apply for all HEX numbers whether you have a Model I, 
Model II, Model III, or Color Computer. 

Ronel Elul, of Beverly Hills, California, sent us this "one-liner" which does 
most of what James William's machine language program does in the 
February 1982 issue: 

10 REM DEPRESS PLAY AND RECORD KEYS ON RECORDER, 

DISCONNECT REMOTE PLUG 

20 REM FOR DISK SYSTEMS ONLY: CMD'T" 

30 OUT255,0:I=0:I=INP(255):IFI=255THENFORX=lTO30:NEXTX: 

GOTO30ELSEGOTO40 
40 REM MAIN PROGRAM 
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Saturn 

This short program will reproduce a picture of Saturn 
as shown above. The picture is a screen dump to a Line 
Printer VII using the screen dump software driver 
provided by Radio Shack. If your Color Computer 
contains the new ROM (version 1.1) you won't need the 
software driver. 

Don Scarberry, Editor 

1000 PMODE4,1:PCLS:PORZ=1TO30:CIRCLE(12 
8 , 100 ) , Z : NEXTZ : PORZ=60TO90STEP4 : CIRCL 
E(128,100)#Z, , .2:NEXTZ:F0RZ=1T02:CIRC 
LE ( 90 , 30 ), Z : NEXTZ : P0RZ=lTO2 : CIRCLE ( 18 
0,150) / Z:NEXTZ:CIRCLE(240 / 180),1:CIRC 
LE(10,30),1:CIRCLE(138,50),1 

1010 POKZKLT05 :CIRCLE( 50, 180 ),Z: NEXTZ 

1020 SCREEN1,0 

1030 GOTO 1030 



Model III owners might have trouble using the FORMS command on the 
disk systems. The FORMS command will allow you to set the number of 
characters per printed line and the number of lines per page. The problem is 
that this command seems to add two additional characters to each line. If you 
select a 60 character line, the actual printed line will contain 62 characters. 
Radio Shack tells us they are currently working on a fix. 



With the 16K Extended BASIC Color Computer you cannot type in a line 
containing 256 characters. Here is a way to get a few more characters: When 
you have typed the 249th character in a line, press the ENTER key. Type 
EDIT (line number). Press X (ENTER). You should now be at the end of the 
line and will be able to enter up to three more characters for a total of 252. 

This procedure is known to work on a 16K Extended BASIC Color 
Computer with the original 1.0 ROM. We would like to hear from anyone who 
has this problem on other versions of the Color Computer. ■ 



WHO OFFERS 

A 90-DAY 
GUARANTEE? 



iWE DO! 

| Data Tech/ 

; Refiance, Inc. 

| DISK DRIVE REPAIR 

2 & ALIGNMENT CENTER 



• 1020 S. 344th St:, Ste. 212 <? 
m FEDERAL WAY, WA 98003 a 

% 1-206-952-2440 " 

V * BASF • MICROPOLIS • SIEMt^ . 
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FASTER -^ 
THAN A K 
SPEEDING Wl 
BULLET 




SUPERKEYS is a keyboard utility 

program for your TRS-80* Model 

III from Advanced Operating 

Systems. Now you can enter 

often-used BASIC commands, 

variable names, or entire lines 

with one keystroke! Functions 

like RUN, LIST, ENTER, and BREAK 

as well as frequently-used 

graphic strings can be saved and 

recalled with one key. 

ABLE TO LOAD LONG 

PROGRAM LINES 

WITH A SINGLE KEY! 

Up to 255 keystrokes can be 

saved to a single key for quick 

entry. SUPERKEYS also includes a 

line-relocate feature unique for 

its on-screen, single-line 

relocation and renumbering. 

IT'S SUPERKEYS! 

For TRS-80 Model III 

(disk)— $49.95 

Now available at your local software 

retailer, or call (800) 348-8558 to order. 

Indiana residents call (219) 879-4693. 

MasterCard and VISA accepted. 




ADVANCED 

OPERATING 

SYSTEMS 

450 St. John Road 
Michigan City, IN 46360 




TRS-80 1 is a registered trademark of Radio 
~. . i± «#* Shack, a division of Tandy Corp. 
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YOU CAN PAY MORE 
BUT YOU CAN'T || t 
GET MORE! 




Model III 16K 

$839 

Model III 48K 
2 disc & RS232C 

$2059 

BUY DIRECT. Those are just a few of our great 
offers which include Printers, Modems, Com- 
puters, Peripherals, Disc Drives, Software and 
more, call toll FREE 1-80O-343-8124 



Color Computer 4K 
$310 

w/16KExt. Basic 

$459 

w/32K Ext. Basic 

$525 



We have the lowest 
possible fully 
warranteed prices 
and a full complement 
of Radio Shack Software. 



com 




us 



Write for your 

free catalog. 

245A Great Road 
Littleton. MA 01440 

617 ■ 486 • 3193 
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STRINGY 
GENERAL 



FLOPPY 
LEDGER 



Because sales of this prograi 
package have far exceeded our 
expectations. He have lowered 
our price to only: 

S29.95 

So you can now purchase this 

excellent software package at 

this outrageously low price. 

Order yours today! !! 

Requires 16K Level II, Printer, 

and Stringy Floppy 

Send Check or Money Order to: 

Maine Data 4 Financial 

Systess Inc. 

S.R. 79, Box 103 

Or land, ME 04472 

Stringy Floppy is a trademark 

of the Exatron Corporation 



PORTFOLIO ANALYSIS 

Track and Analyze your stock portfolio with these programs 
for the TRS-80* Mod 1 & 3. 

The Stock Analysis Package consists of four programs 
which allow Database creation & maintenance; Graphing of 
prices, moving avg. & volume; and Generation of a Portfolio 
Analysis Report to evaluate your market position. 

Programs are written in BASIC and are MENU driven with 
Error Trapping for ease of use. 

TRS-80* Mod 1 or 3, 48K & one disk drive required 
Printer required for Portfolio Analysis report. Price for the 
entire package is $74.95. To order or to receive more infor- 
mation, fill out coupon below or call (214) 867-5656. VISA & 
MC are accepted. 



P.Tree Enterprises Suite 269 

2701-C West 15th Street Piano, Texas 75075 

□ Payment enclosed or charge my □ VISA O MC. 

□ Please send more information. 

Name 

Address : 

City State Zip 

Account # Exp. Date 



*TRS-80 is a trademark of the Tandy Corp 
Circle #71 

FRICTION FEED FOR YOUR EPSON 

MX-70° MX- 80' 

*>K-70 and f.K-80 are Trade Marks of EPSCN, Inc. 
k*** ******************** ******* ft*******.*.*** 

+ Converts your printer for friction 
feed of SINGLE SHEETS or ROLL 
PAPER. 

+ Snap-on Installation (all you 

need is a screwdriver, no soldering 

+ Tractor feed remains undisturbed. 

+ Proven reliability. -^ ^/^i 

+ Available NOW! ^~\ " - " p 

+ Only $39. 95 (add $1.50 for postage) 

SATISFACTION GlV.RANTEF.n OR YOFR MONEY BACK 

-VBA_\ MICRO-GRIP, Ltd. 

P.O. BOX 873 
VI SA& Master Card Accepted LAFB, VA 23665 
(8041 826-8808 
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MICRO-DESIGN PRESENTS 
THE MDX-4 

PHONE MODEM 

P.C. BOARD & USER MANUAL 

$39.95 

* 300 BAUD 

* DIRECT CONNECT 

* ANSWER AND ORIGINATE MODES 

* SOLDER-MASKED & SILK-SCREENED 

* ON BOARD POWER SUPPLY 

MDX-4 PC BOARD & USERS MANUAL . 39.95 

USERS MANUAL S.9S 

(Texas Residents Add 5% Tax) 
(Add 13.00 Shipping lor Board) 



CALL Oft WRITE: 



MD 



MICRO DESIGN 

P.O. BOX 748 
MANCHACA, TX 78652 
(512) 282-0225 



55 



DEALER INQUIRIES INVITED 
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MICRO 

MOONLIGHTER 

NEWSLETTER 



The ONLY publication devoted 
exclusively to helping you create, 
build, and maintain a home-based 
business using your micro-system. 
SUBSCRIBE NOW to what may be 
the most important publication in 
YOUR FUTURE ! 

1 Year (12 issues) only $25 U.S., 
$29 Canada, $35 World Wide 

J. Norman Goode, Publisher 

Micro Moonlighter 

Newsletter 

2115-J Bernard Avenue 
Nashville, TN 37212 

Visa and Mastercard welcome. Send 
account number and expiration date. 
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MAGAZINE SAMPLES 
FREE listing of over 150 
magazines offering a 
sample copy - 50<F per 
sample. Send stamped 
self-addressed #10 
envelope to: 

PUBLISHERS 
EXCHANGE 

PO Box 1368, Dept 278 

Plainfield, New Jersey 

07060 
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REAL ESTATE SOFTWARE 

! for APPLE, TRS-80 + PET 

• PROPERTY MANAGEMENT SYSTEM: $325 

'■-■■■ • Ownership Filas 

: • Building Reports 



PROPERTY LISTINCS/COMPARABLES: $325 









• Units/Zone/City 


11 Items/Listing 


• Max Price/Income 


000 Listing/Disk 


• Max Price/Sq Foo 







REAL ESTATE ANALYSIS MODULES: $40/Module 

• Home Purchase • Tax Deferred Exchange 

a Prop Analysis * APR Loan Analysis 
ty Sales • Loan Amortization 

i Cost/Profit * Depreciation Analysis 

WORD PROCESSOR - MAGIC WAND: $285 



MIIIM,l!l!ll«HIMI.IIHIimMIHIH,l,imiJ,B» 
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DID YOU BUY YDUfi COMPUTER TO HELP 
YOU MAKE OR SfiVF. MONEY? 

BI SPLAN 

Is far the person wanting to start 
a smal 1 business. Or for the 
person who is operating a snail 
business. Von enter all the 
f i nanc i al in* Drmat i on per t a i ni ng 
to your business plans and BISPLAN 
will produce PROFIT t« LOSS 
STATEMENTS, CASH FLOW ANALYSIS and 
BALANCE SHEETS. Each projected 
for up to S years. BISPLAN will 
also indicate financing needs. 
Printed output suitable for loan 
appl i cat ions, business proposals, 
etc. "What if" ideas tested. 
Entries easily changed. Ideal for 
small business proposals as well 
as for projecting existing 
bust ness expectations. 
I NTERACT I VE . COMPREHENS 1 VE . 

NEW - Store data on tape or disk. 

On cassettei Specify Hod I or III 
32,48K - *24.50 +»2.00 shp, hndl . 
l&K - *19.50 MO res add 3 5/BX 

Mariah Computing, P.O. Box 513 
Columbia, MO 65205 
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Color Computer 
Software 

We have one of the largest selections of software 
and hardware for the Color Computer. Here are a 
few examples: 

Color Computer Combo— 15 programs on 1 
tape for less than S1 ea. Includes Biorhythm. 
Letter Processor, and several games and utili- 
ties $14.95* 

Berserk and Color Pac Attack— Two of the best 
graphics games currently available for the Color 
Computer. Detail you'll have to see to be- 
lieve $33.95* ea. 

Write for our complete catalogue. 

DISK N DATA 

5450 Rugby Street 
Burnaby, B.C. Canada V5E 2N1 

" All prices in $Cdn. U.S. orders discounted 18% 
Pis. add $2 for postage and handling. 
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WILD 
CAT 



REMARKABLE TRS-80 

DISK DIRECTORY 
CATALOGUE SYSTEM 

Catalogue contains Fllespec, FIRST LINE REMARK, 
disk ID, disk name, disk date and free grans 

Model 1 using TRSDOS 2.3 or any Version NEWDOS 
Uses fast machine code for reading and sorting. 

$39.95 + $2.00 S/H Req.48K. Two 5" Drives 
Satisfaction guaranteed or return within 10 days. 

DONALD M. FIELDING 

2207 N.W. 61st PLACE • MARGATE, FL 33063 

(305) 972-6744 

Dealer Inquiries Invited 

TRS-80 and TRSDOS -Trademark of Tandy Corp. 

NEWDOS - Trademark Apparat Inc. 
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LYNX 

TRS-80 

MODEM 

S239 88 



D Compolability with both Mode! I and III 

D No separate purchases required 

D One-year warranty 

D Auto dial/Auto answer 

O Works with any software, including ST-80 

by Micklus 
D Active CLEAR, BREAK, and "CONTROL" keys 
D Holf or full duplex, variable word length, 

ponty. and stop bits 
D Diol from phone, keyboard, or memory 
D Works with or without Model III RS-232 card 
D Con be placed on either side of Model III 
Q No tools needed to install 

HIGH TECHNOLOGY AT AFFORDABLE PRICES 




\-Bm 



Orders & Information 
(603J-673-8857 

Orders Only 
(800)-343-0726 



12 Johnson Street, Milford NH 03055 
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COMPendium 



UNIQUE . . . 
only monthly that 
abstracts over 500 
articles . . .soft /hard- 
ware & "book reviews 
in 20+ micro-magazines 
(200 references to 
TRS-80 computers alone) 

Sample i $1.50 

Yearly (12 issues): $18 

EPICURI0US 
P0 Box 129 
Lincolndale, NY 10540 

INDISPENSABLE . . . 



IEEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPIB-488 controller capability 
to TRS-80 Model 1 or 3, Level 2 or 
DOS with a minimum of 16K. 

488-80B 
For Model 1 



488-80B | __, 

For Model 1 I /Fl_ 

Operation 1 rwjBitai 

■■■M I — — ' 



nHftB^KwHft 



488-80C 
- — : For Model 3 

(HJH Operation 

Model 488-80B or 488-80C Price: $325. 

+ shipping, insurance & tax 
WHEN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING 
LABORATORIES 

11 Neil Drive • Old Bethpage, NY 11804 
Telephone: (516) 694-3205 

'Trademark of Tandy Corp. 
There is no affiliation between Scientific 
Engineering Laboratories and Tandy Corp. or 
Radio Shack. 
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DOSPLUSE 



OWNERS 



Our brand-new expanded 

user's manual will provide 

you with greater in-depth 

information on all 

versions of DOSPLUS. Over 

160 pages of 

documentation, yours for 

only $29.95. To order, call 

1-800-348-8558. 

MasterCard and VISA 

accepted. 

ADVANCED 

OPERATING 

SYSTEMS 

450 St. John Rd. 
Michigan City, Indiana 46360 
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TRS-80 MODEL I™ 

GOLDPLUG-80 

Eliminate disk re-boots and data 
loss due to poor contact problems 
at card edge connectors. The 
GOLD PLUG - 80 solders to the 
board card edge. Use your ex- 
isting cables. 
CPU /keyboard to 

expansion interface $18.95 

Expansion interface to disk, prin- 
ter, RS232, screen printer 

(specify) $9.95 ea 

Full set, six connectors. . . $54.95 



EAP COMPANY 

P.O. Box 14, Keller, TX 76248 

(817)498-4242 

*TRS-80 is a trademark of 

Tandy Corp. 
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Dental Computer 
Newsletter 

E. J. Neiburger, D.D.S., Editor 
1000 North Avenue 
Waukegan, IL 60085 

The D.C.N, is an international 
group of dentists, physicians and 
office management people who 
have interests in office computers. 
Though the emphasis is on micro- 
computers, many members use 
minis. We cater to all makes and 
brand names. 

Annual membership dues 
$15.00. Membership runs from 
January to January. If you join 
mid-year, we will supply you with 
the year's back issues. 
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COLOR COMPUTER 
KIDS' PROGRAMS 



**CIRCUS ADVENTU^** iS-H 
fidve^ture game on a chilrf'? 
level coritainiw graphics, 
sonas and surprises. Fun for 
the entire family. * StCLOD 

!WE 7KGT SONS ** lS-K EXT, 
72 swigs to challenge you 
rind your children. Two 
levels of difficult; 1 , Many 
hours ofe family furi.'SlQ.OG 




COMPUTER ISLAND 

£27 HflMDTON GREEN 

STfTTPN ISLAND, N.Y. 10312 



(other tapes available) 
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DISKETTES 
CASSETTES 



Error-Free 5V4-inch Diskettes (MD- 
5) single-sided, soft sector, single or 
double density, reinforced hub. 



Item 


Qty 10 


Qty 50 


MD-5 


$25.00 


$110.00 


C-10 
C-20 
C-60 
C-90 


$ 7.50 

9.00 

11.50 

15.00 


$ 32.50 
39.00 
50.00 
70.00 


UPS SHIPPING INCLUDED 

in Continental USA 

CA Customers add taxes 



MICROSETTE 

475 Ellis St., Mt. View, 
CA 94043 (415) 968-1604 



Thank You! 

80-CI.S. Journal 
Readers 

Your acceptance of our Level 2 
programs has guaranteed our 
success. 

TRS-80* Model I/III Program 
Inquiries Welcomed 

J/C Enterprises 

Box 441186 
Miami, FL 33144 

"trademark of Tandy Corp. 



STOP! 

Don't throw away your used EPSON 
MX-80* ribbon cartridges. 

We'll reload your cartridges, sell you 
the ribbon to reload them or if you don't 
want to bother we'll even buy your used 
cartridges and sell you brand new ones at 
reasonable prices. 

ALSO AVAILABLE. . . Areinker that will 
do the job for less than the retail price of a 
new cartridge. 

We'll also tell youaboutadevicetofeed 
single sheets into most any pin feed 
printer that costs less than $4.00. 

All sorts of new ideas in the works. 

Write today for free information. 

Pete Skeberdis 

P.O. Box 27 
Fremont, Michigan 49412 

•EPSON &MX-80are trademarks of EPSON. Inc 
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PRINTERS SALE 
EPSON $ CALL 

OKIDATA $ CALL 

TELEVIDEO SYSTEMS 
25% OFF Catalog Prices 

Ohio Scientific Computers 
20% OFF Catalog Prices 

FOR THE BEST PRICES IN 
THIS JOURNAL, CHECK THE 
OTHERS, BUT CALL US 

OPTIMUM INTEGRATED 
SYSTEMS, INC. 
987 N. ARLINGTON AVE. 
INDIANAPOLIS, IN 46219 
Tel. 317/359-7445 



THE COLOR COMPUTER'S 
OWN MAGAZINE 

• Game Programs 

• Useful Utilities 

• Honest Product Reviews 

• Hints and Tips 

• Software discounts 

The RAINBOW is the only monthly magazine 
devoted exclusively to the TRS-80 Color Computer.* 
It will make your computer more useful than ever 
before. 

"" / could make only one purchase lor my Color 
Computer, it would be the RAINBOW lis lanlasl/c!". 

—G. S . Houston (a subscriber) 

Subscribe to the RAINBOW today. A 12-month 
subscription is only $12. 




-"^ the RAINBOW 

5803 Timber Ridge Dr. • Prospect KY 40059 

r'anemark c' Tandy Corp 
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softbyte computing 

STAR SEARCH ASTRONOMY GUIDE 

Instantly display a map of the skies overhead 
for any date and time entered. $19.95 

STOCK CHART GRAPHER 

Monitors changes in any stock's price and 
volume activity, but buy and sell limmtj is 
determined by you. $19.95 

THE RECORD KEEPER 

An expandable information filing system that 
auto-adjusts to any memory size with son. 
search, totals, adjustable record lengths up 
lo 200 char, and 10 fields. 

Mill. Req. 16K TRS80 Ml or 3 

Softbyte Computing 

Box 217 

Wallingford, Conn. 06492 
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Architectural 
Engineering 

1 . Structural Timber Design- 
eight loading conditions for any tim- 
ber species. Also plybeam design. 

2. Structural concrete— beams, 
slabs, retaining walls, etc. 

3. Structural steel— eight load- 
ing conditions for WF beams. 

4. Heat loss and SLR— for 
passive solar design. 

For TRS-80 Model I or III 

Cassette or E3f 

$35 ea. program. TotaTpkg. $95. 

ERIC CLOUGH 

Winlaw, B.C. 
Canada VOG 2J0 



LDOS 

$99.95 

(Specify Model I or III) 
Also 25% Off List on Software 
from: 

ADVENTURE INT. 

GALACTIC SOFTWARE 

STRATEGIC SIMULATIONS 

and more. . . 

Send check or money order to: 

SoftHart Enterprises 

1105 S. Beloit Ave. 
Forest Park, I L 60130 

For catalogue Information, or VISA, 
Mastercard orders, phone (312) 771-2857. 
add $2"° shipping and handling; 
Illinois residents add 6% tax. 



AMRAD 

Amateur Radio Research and 
Development Corporation 

AMRAD i8 a worldwide club of 
radio and computer amateurs. 
Activities include: 



• Monthly AMRAD Newsletter 

• Amateur Networking and Protocols 

• Computer Bulletin Board System 

• Handicapped Education Exchange 
(HEX) 

• Deaf Telecommunications Research 

• Spread Spectrum Experimentation 

• 2-Meter Voice and Data Repeater 

1524 Springvale Avenue 
McLean, VA USA 22101 
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Do a friend a 
favor! 

Do you know anyone 
who has a TRS-80 and 
does not regularly read 
80-U.S.? Tell them about 
it — it will help all three 
of us. Thank you. 



NEC. 
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MODEL II 
PROGRAMS 

TUTORPAK 

An integrated package of 30 lessons that 
tutor tha user in the BASIC language. Ideal 
lor Model II owners who wish to learn BASIC 
in a self-paced manner ; $30.00. 

DEMOPAK 

A smorsgasboard of 50 programs for 
leisure and personal use. Included are 
games (28) personal finance (12), math/stat. 
(10}. All tor lass than $1.00 par program! 
$40.00. 

BUDGET MONITORING SYSTEM 

Monitors multiple project or personal 
budgets. Tracks expenditures, an- 
cumberancas, and balances in user defined 
categories on actual and percent complete 
bases. Ideal tor busy researchers, 
businesmen, or engineers who wish to 
monitor projects budgets $40.00. 



Send Check or money order to: 

Southtork Software 

68 Feirlake Drive 

Hattiasburg, MS 39401 

Specify TRSDOS 1.2 or 2.0 

Version with order. 
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ABS Suppliers 

3352 Chelsea Circle 

Ann Arbor, Ml 48104 

(313)971-1404 



B1 7 TAPE OPERATING SYSTEM will let you 

• Save & Load programs 6X faster than Model-1. 

• Save & Load Data Arrays over 800X faster. 

• Backup standard System tapes that load-n-go. 

• Certify cassette tapes for B17 use. 
$24.95 Specify Model 1/3 16K/32K/48K RAM. 
Inexpensive Upgrades available. 3rd year of sales. 

B1 7 DISK/BAS is a Disk version. Lets you saveany 
diskfile to cassette at 3000 baud. Inexpensive way 
to backup your files Works with any DOS. Includes 
tape certifier. Requires 32K RAM-up. 
$19.95 Specify Model 1/3. 

WORDSMITH Word-processing program in BASIC. 
A 'Trainer' for more complex W/P programs Easy- 
to-use. Specify Tape/Disk version. Tape version 
requires B1 7 Tape Operating System (above). Disk 
version requires 32K RAM-up. Uses MX-80 Printer. 
$19.95 Specify Model 1/3. 

Add $1.50 postage/handling per item. 



PC-8023A Printer 




NEC PC-8023A . 

The NEC 8023A matrix printer 
outperforms every printer in its 
price range — and then some. 
Numerous software-occesible 
fonts for versatility, legibility, 
variety, contrast, and emphasis. 
Crisp, clear, clean dot matrix 
impressions on your choice of - 
friction-fed or pin-fed paper. 
Standard Centronics- type 
parallel interface. 



. $499 88 DELIVERED 

■ High-resolution graphics 

■ Proportional spacing 

■ 8 character sizes 

■ 5 unique alphabets 

■ 100 CPS print speed 

■ Bidirectional, Logic Seeking ' 

■ Friction feed/adjustable 
tractors 

■ Bidirectional paper feed 

■ Subscript, Superscript, 
&underlining 

■ Single sheet friction feed 



HIGH TECHNOLOGY AT AFFORDABLE PRICES 

Orders & Information 
(603)-673-8857 
Orders Only 
12 Johnson Street, Milford NH 03055 (800J-343-0726 



I— ®m 
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TAKE A BYTE - 
OUT OF YOUR < 
SOFTWARE COST? 1 

Save 20-40% on all major 
Brands of micro-software 

90 day guarantee-when you're happy, 
we're happy! 

Gigantic inventory of old and new 
releases. 

Overnight shipment by UPS-no per 
item handling fee. 

We credit orders $1 .00 when you call 
from out of 213 area. 

Eligible for free Visicalc if order within 
60 days. 

SOFTWARE GALORE 

For free catalog/orders call 213-827-1851 

(8 am - 5 pm only) 800-772-2666 x989 (CA) 

800-227-2634 x989 (National) 
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TOTAL 

DISKETTE 

BACKUP 



w 



INCLUDING UNLIMITED BACKUP 
OF MOST PROTECTED DISKS 

If your diskette software library is not com- 
pletely backed up, or, if you are wasting disk- 
ettes by making backup copies of all your 
diskettes, your problem is solvedl Using 
DUMPLOAD, the total contents of your disk- 
ettes can be safely dumped to tape. The hi- 
speed tape option allows six 35 or 40 track 
diskettes to fit on one C60 casette. 

• TRS-80 Model 1 16K-48K 

• TRSDOS or NEWDOS80 Compatible 

• May be used to back-up TRSDOS, VTOS 
4.0, NEWDOS, MICRODOS, or data 
disks. (Single Density) 

— $16.95 on Cassette — $19.95 on Diskette 
Plus $1.00 handling (Indiana Res. add 4% tax) 
TOLL FREE 24 HR. ORDERING SERVICE 
1-800-525-9391 (Ext. 509) (Except Colo.) 
1-800-332-9259 (Ext. 509) (Colo. Residents) 

or Mail Check or Money Order To 
COMPLETE COMPUTER SERVICES 
8188 HEATHER DRIVE 
NEWBURGH, INDIANA 47630 



PH 




And the Pacific 
Northwest 

YOU NOW HAVE 

A DISCOUNT 

TRS-80 DEALER 

IN YOUR AREA 



We also handle: 

! EPSON PRINTERS 
I HAYES MODEMS 
I MOD III DRIVE KITS 
I TANDON DRIVES 
I TRAXX 

ALL AT BIG 
DISCOUNTS! 



We have a great 

selection of all 

the popular 

games, too. 



WE TALK YOUR 
LANGUAGE! 



EVERETT COMPUTER 
CENTER 

RADIO SHACKDLRW-a84 

2723 COLBY 

EVERETT, WA 98204 

(SOS] 259-OOS4 
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Unclassified. 



Advertiser index. 



UNCLASSIFIED ANNOUNCEMENT 
This unclassified announcement space is 
available free to individuals with single or 
unusual items for sale ortrade. 80-U.S. Journal 
reserves the right to reject any commercial 
advertising in this section and suggests using 
our display advertising for that purpose. 

These notices are free of charge and will be 
printed one time only on a space available 
basis. Notices will be accepted from individuals 
or bona fide computer user clubs only. All these 
unclassified announcements must be typed, 
contain 75 words or less and include complete 
name and address information. 

FOR SALE: Radio Shack Line Printer VI. Printer 
with Model III cable, 30 hours' use, otherwise like 
new. $600 plus shipping or best offer. Ron 
Worthington, 2459-1E Prairie St., Evanston, IL 
60201, (312) 866-6325 or 982-7863. 

MDX-2 EXPANSION INTERFACEfor Model I. 

Assembled, includes parallel printer port, 32K 
RAM, serial port, modem, on-board power 
supply. Over $240 invested, asking $100 firm. D. 
Youngs, 3481 Peach Tree Way, Oceanside, CA 
92054, (714) 433-9360. 

TRS-80 MODEL I HARDWARE/SOFTWARE. 

Various items for sale such as Model I disk drives 
and various software packages used for Model I 
before I bought a Model III and sold the Model I. If 
interested, please write for list: Richard Yehle, 
8952 Autumnwood Drive, Sacramento, CA 
95826. 

I AM INTERESTED IN TRADING my non- 
copyrighted software for your non-copyrighted 
software. If you are interested, send a S.A.S.E. for 
a complete list of available software. Charles A. 
Quante, 1804 S. 19th St., Tacoma, WA 98405. 

WE ARE LOOKING FOR A GOOD CLEAN 

backup Model I system for our business Model I 
now in use. Will buy un-tampered Model I 
keyboard (prefer 1 6K), Model I Interface (prefer 
32K), Model I Video, Model I Disk Drives (Radio 
Shack only, single density), etc. Crown Decal & 
Display, 1608 Edgemont, Bristol, TN 37620. 

TRS-80 VOICE SYNTHESIZER. Only owned it 
for 6 months. Cable and power supply included. 
Extensive documentation, magazine articles, 
cassette software and 14,000 word dictionary 
included. Easy to use, reliable, virtually unlimited 
vocabulary. Works with or without expansion 
interface. Originally sold for $400. Must sell to 
buy expansion interface. $150 or best offer. Chris 
Calwell, 3211 SW 19th,Topeka, KS 66604, (913) 
233-9339. Feel free to call. 

FOR SALE: 32K Microtec Memory Box and 
Printer Port; TC-8 "Poor Man's Floppy" with two 
cassette drive capability; Radio Shack Quick 
Printer (prints on 4Vi" electrostatic paper with 
full line printer controls); and lots of software 
converted to run on TC-8. All for only $400 or best 
offer. It's a great system, but now I'm moving up 
to disks. Call Tom Crews at (713) 821-1518 or 
write to 6627 Archgate Dr., Spring, TX 77373. 

DYNATYPER $425. Use mostanytypewriter as 
a printer with Model I or workalike computer. 6 
months old, works fine, connects to keyboard. 
Wayne King, 36 Sickles St. #2D, New York, NY 
10040, (212) 695-6802 or (212) 567-3395. 
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WHY 



the latest blast 
[from big five- 
DEFENSE 
COMMAND 



ALL GAMES'- 

16K Level 2, Modi + Mod 3 Cassette: $15.95 
32k Level 2, Mod 1 + Mod 3 Diskette: $19.95 
10% discount for2 games, 15% for3ormore 
Games may be played with or without joystick. J 



BEST 
SELLER , 



IS THE ALPHA JOYSTICK 
SUCH A SUCCESS ? 

Because of games like these. 

DEFENSE Jjijfc 
COMMAND ^Pr 

Big Five has done it again! Now the most popular 
arcade game of all time has a fascinating new twist. 
The Invaders are back! You are alone, valiantly 
defending the all important nuclear fuel cannister 
stockpile from a convoy of thieving aliens who 
repeatedly break off and attack in precision forma- 
tions. An alien passes your guard, swiftly snatching 
up a cannister and flying straight off. Quick! you 
have one last chance to blast him out of the sky. 
Great action and sound! 



V 



Actual unretouched photos 




SCARFMAN 




BEST- 
SELLER/ 



SCARFMAN 

THE LATEST ARCADE CRAZE now runs on your 

TRS-80. 

It's eat or be eaten. You control Scarfman around 

the maze, gobbing up everything in your path. You 

attempt to eat it all before the monsters devour you. 

Difficulty increases as game progresses. Excellent 

high speed machine language action game. From 

The Cornsoft Group. With sound. 

CAUTION: Played with the Alpha Joystick, Scarfman 

may become addictive. 




SUPER NOVA* 



Asteroids float ominously around the 
screen. You must destroy the asteroids 
before they destroy you! (Big asteroids 
break into little ones.) Your ship wilt 
respond to thrust, rotate, hyperspace 
and fire. Watch out for that saucer with 
the laser! As reviewed in May 1981 Byte 
Magazine. 



LUNAR LANDER 

As a vast panorama moonscape scrolls 
by, select one of many landing sights. 
The more perilous the spot, the more 
points scored —if you can land safely, 
You control LEM main engines and side 
thrusters Absolutely the Pest use of 
TRS-80 graphics we have ever seen! 
From Adventure International With 
sound. 
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ATTACK FORCE* 

As your ship appears on the bottom of 
the maze, eight alien ships appear on the 
top. ail traveling directly at you! You 
move toward them and fire missiles. But 
the more aliens you destroy, the faster 
the remaining ones become. If you get 
too good you must endure the "Flag- 
ship"... With sound effects! 




COSMIC FIGHTER 

Your ship comes out of hyperspace 
under a convoy of aliens. You destroy 
every one. But another set appears. 
These seem more intelligent. You 
eliminate Ihem, too. Your fuel supply is 
diminishing. You must destroy two more 
sets before you can dock. The space 
station is now on your scanner... With 
sound! 



METEOR MISSION IP 



As you look down on your view, 
astronauts cry out for rescue. You must 
maneuver through the asteroids & 
meteors. (Can you get back to the space 
station?} Fire lasers to destroy the 
asteroids, but watch out, there could be 
an alien FLAGSHIP lurking. Includes 
sound effects! 



ITHE ALPHA JOYSTICK: # «"L 
REAL ARCADE ACTION *2S?? 




□ Features the famous ATARI JOYSTICK 
QWorks with any Level II or disk system 
QPIugs directly into KB or E/l (next to printer port) 
□Compatible with any other TRS-80 accessories 
□Saves your keyboard 

□ Fun to experiment in BASIC. Simply use A-INP(O) 
to read the joystick 

□ Fully assembled, ready to plug in and use. 

Price includes Atari Joystick + Alpha Interface + 
instructions + demo program. The Alpha Joystick 
is backed by an unconditional money back 
guarantee. If you are not delighted with it, return it 
within 14 days for a prompt and courteous refund. 




MODEL III 
JOYSTICK 

ONLY 

$49.95 



(Model I 
version 
shown) 



Circle # 103 



Toll Free 

Order Line 

800-221-09161 

Hours: 9AM-5PM, E.S.T. 
For Info Call (212) 296-5916 



Ml ALPHA Products 



85-71 79th Street, Woodhaven, NY. 11421 



(212)296-5916 



ADD $2 00 PER ORDER FOR SHIPPING AND HANDLING 
WE ACCEPT VISA. MASTER CHARGE. CHECKS. M 
C 0D. ADD $3 00 EXTRA 
QUANTITY DISCOUNTS AVAILABLE 
NY RESIDENTS ADD SALES TAX 
OVERSEAS ORDERS ADD 10% 
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LDOS R\CKAGE SPECIALS. 



THE ULTIMATE DISK-OPERATING SYSTEM LDOS™ 

The new generation of operating system for the TRS-80. Far superior to any on 
the market. It is a totally independent device system, capable of device linking, 
routing, setting, and filtering. LDOS will support 5" and 8" floppies, single/ double 
density, single/double sided, and up to 80 tracks. Excellent documentation in a tab 
indexed manual (over 280 pages). Call today. Available for Model I or III. . . .only 
$129.00. LDOS™ is a product of Logical Systems Inc. Also available: EDAS 3.5 
Model I and 1 1 1.... $79.00 

LDOS PACKAGE SPECIALS 

LDOS + MAIL/FILE 
LDOS + INVENTORY MOD I 
LDOS + INVENTORY MOD III 
LDOS + STOCK MARKET MON. 
LDOS + EDAS 
LDOS + FED (FILE EDITOR) 
LDOS + LED (LDOS EDITOR) 
LDOS + FED & LED 
LDOS + FILTER PACKAGE 
LDOS + "LC" LANGUAGE 
LDOS+ MONITOR 
LDOS + ULTRA TREK 
SUPER LDOS DEVELOPMENT PACKA 
LDOS + LC + FED + LED + EDAS 
+ FILTER PKG. + MONITOR 

**Offer good during April & May. 1982 

FED - THE LDOS FILE EDITOR 

This is the ultimate in file "ZAP" type tools for use with your LDOS system. Full 
access to files. ASCII and HEX searches, find a load address or where a byte 
loads. Full HEX or ASCII modify, even to the directory. Two display modes and 
a built in menu plus unique features that have never been available in this type 
of system tool. Available now for just. . . .$40.00 

LC - LDOS "C" 

This is a very powerful implementation of the "C" programming language. It 
comes complete with an extensive function library and generates executable 
code or assembler source that is compatible with either the MAC-80 or EDAS. 
For efficient creation of both systems and applications code, this is the language. 
The language of the future now for just. . . .$150.00. 

LED - LDOS TEXT EDITOR 

This is the official LDOS text editor designed for writing and maintaining almost 
any type of text. Handles both line number and unnumbered text files with word 
processor like functions. Great for all types of pure ASCII source files, even 
BASIC, and for PATCH and JCL files. Many special features make this editor 
a "must have" program for the serious user. Finally, a functional text editor for 
just. . . .$30.00. 





YOU SAVE 


$199.00 


$89.00 


$199.00 


$89.00 


$299.00 


$89.00 


$179.00 


$49.00 


$179.00 


$29.00 


$149.00 


$20.00 


$139.00 


$20.00 


$169.00 


$30.00 


$169.00 


$20.00 


$229.00 


$50.00 


$139.00 


$15.00 


$129.00 
AGE 


$19.95 


$369.00 


$144.00 



FILTER PACKAGE 

This package is a collection of powerful filter for the LDOS "devices" to bring 
out the true power of the LDOS concept. Included area HEX-DECIMAL-BINARY- 
CALCU LATE-CONVERT filter for your keyboard, a filter to expand basic code 
to a formated structure during listing and a complete translations filter to convert 
any or all 256 possible characters to other characters even in a by directional mode. 
Use this package to give your system a DVORACK keyboard or to have your 
system talk in EBCDIC. Many, many handy additions to your LDOS system for 
just. . . .$60.00. 

MONITOR - THE LDOS DISK I/O MONITOR 

This program brings to LDOS the power of a mini or mainframe error monitor 
system. When a disk error of any sort occurs, the monitor takes control and 
allows the operator to select; ABORT, CONTINUE. RETRY or IGNORE. This 
allows recovery from many problems that before would have caused the loss of 
data or the interruption of program. Don't let a simple parity error ruin your day 
again! Get the program that pays for itself the first time it does its job. Be in control 
of your system for just. . . .$25.00. 

MAILING SYSTEMS - MAiL/FILE-SERIES II 

NEW Series II Mail/File has all of the outstanding features of the original Series 
I Mail/File. PLUS many additional qualities which again will set standards for 
this type of system. "Word processor" type input editor, fast sorting, and fabulous 
editing capabilities are a few of its features. Name and ZIP code are under constant 
sort. A really great Mailing List-Data Base manager. Model I system will handle 
up to 600 names. Model III system will handle up to 1200 names. . . .$159.00 

BUSINESS SYSTEMS - INVENTORY MASTER SYSTEM 

The program to fill your needs. Control up to 2700 items. With today's market, 
keeping on hand only what your demand calls for is reason enough to let your 
TRS-80 accurately and effectively take care of your inventory. Always know what 
to stock and when to stock it. This system has many features which were modeled 

after a main frame system of large capacity. Model 1 version just $159.00. Model 

III version just. . . .$259.00. Also available for the Model I or III Stock Market 
Monitor: Cassette version. . . $89.00. Disk version. . . .$99.00. 

Money orders, credit cards 81 cod's shipped within 24 hours. 
TRS-80 is a trademark of Tandy Corp. 



Can't wait? Call 

414/241-8050 

SdldCtlC soi twdrc ltd. 

1 1520 North Port Washington Road 
Mequon, Wisconsin 53092 




Increase Your Productivity With a 
Radio Shack TRS-80 Personal Computer 



Here are two personal productivity tools that are an aid 
to any busy manager. They let you spend more time man- 
aging and less time "pushing a pencil." Our Time 
Manager™ program helps you organize your busy sched- 
ule, showing appointments and a "to do" list. It can be 
your daily organizer, filing system, electronic "notepad", 
project coordinator, financial assistant, and more. 
VisiCalc® lets you solve problems, forecast, and analyze 
the effect of your decisions. And both programs are avail- 
able for the Radio Shack TRS-80 Model III Desktop 
Business Computer. 

Time Manager: Your Daily Calendar . . . and More! 

This "electronic" calendar, automatic reminder and filing 
system lets you plan, organize, schedule and record your 
daily activities. You assign priority levels and categories 
to each entry. Then you can view today's agenda — or 
look ahead at what's coming up. There's even a "to do" 
list that will follow you from day to day until finished. 

Locate Information Quickly. You can scan your year's 
data for specific information by category and/or keyword. 
For example, if you select the telephone category and a 
keyword — such as a person's name — Time Manager in- 
stantly locates the calls you made to that person during 
any designated period, along with your notes con- 
cerning each call. 

Track Projects, People, and Expenses. 

Review schedules and progress, examine 
the frequency of meetings, recall ex- 
penses, create financial summaries, 
and much more with a few simple 
keystrokes! 




VisiCalc: The Professional's Planning Tool. Radio 
Shack's Model III VisiCalc dramatically improves the way 
you do financial planning, budgeting, sales projections, 
job costing, engi- 
neering designs, 
scheduling, prod- 
uct pricing, and 
even personal fi- 
nancial decisions. 
VisiCalc is an "elec- 
tronic" columnar 
pad. Just define the 
formulas, enter 
your figures, and 
VisiCalc performs 
all calculations and 

automatically displays the results. Now change any value 
or formula on your worksheet, and VisiCalc instantly up- 
dates every related number! You can view countless 
"what if . . . "situations in seconds, rather than the hours 
required with pencil and paper. 

The Hardware. TRS-80 Model III is our most affordable 
desktop business computer. It features two double- 
density internal disks for 368K bytes of storage (two more 
can be added externally), a full 48K RAM, a parallel and 
an RS-232 port, plus a high resolution monitor with upper 
and lower case characters. We include Model III BASIC, 
and offer optional languages including COBOL, 
FORTRAN, Assembler and Compiler BASIC. 

We Have Other Ways to Save You Time. Discover 
electronic filing, word processing, and the many other 
ways a TRS-80 can increase your productivity! See Time 
Manager ($99.95), VisiCalc ($199), and the 48K 2-Disk 
Model III ($2495) or our other Model Ills (as low as $699) 
at a Radio Shack Computer Center, store or participating 
dealer near you today! 

The biggest name in little computers™ 

A DIVISION OF TANDY CORPORATION 




Send me your free TRS-80 Computer Catalog. 

Mail To: Radio Shack, Dept. 82-A-369 
1300 One Tandy Center, Fort Worth, Texas 76102 



_zip . 



Retail prices may vary at individual stores and dealers. 

"Time Manager is a trademark of Image Producers, Inc. 

®VisiCalc is a registered trademark of Personal Software, Inc. 
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Frustrating isn't it! No matter how 
much you speed up your program 
it still seems to take forever to save 
data onto a cassette. Wouldn't it 
be great if someone could design a 
mass storage system with the speed 
of a disk, but at half the cost? 
Exatron did, the Exatron Stringy 
Floppy (ESF) . 

Totally self-contained, the ESF 
is an extremely fast, reliable, and 
economical alternative to cassette 
or disk storage of programs or 
data. All of the ESF's operations 
are under the computer's control, 
with no buttons, switches, knobs or 
levers to adjust or forget. 

The ESF uses a miniature tape 
cartridge, about the size of a busi- 
ness card, called a wafer. The 
transport mechanism uses a direct 
drive motor with only one moving 
part. Designed to read and write 




digital data only, the ESF suffers 
from none of the drawbacks of 
cassettes - without the expense of 
disks. 

Several versions of the ESF are 
available, for the TRS-80, Apple, 
PET, OSI and an RS 232 unit. 
Even the slowest of the units is 15 
times faster than a cassette, and all 
are as reliable as disk drives - in 
fact a lot of users say they are more 
reliable! 




excellence in electronics 

exatron 



To get further information about 
the ESF give Exatron a call on 
their Hot Line 800-538 8559 
(inside California 408-737 7111). 

If you can't wait any longer then 
take advantage of their 30 day 
money-back guarantee, you've 
nothing to lose but time! 

181 Commercial Street 
Sunnyvale, CA 94086 
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TRS-80, Apple and PET are trademarks of Tandy, Apple and Commodore respectively. 



